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Preface 


This  User's  Manual  is  meant  to  be  the  single,  comprehensive  source 
from  which  a  user  can  obtain  the  information  necessary  to  run  problems  under  tlje 
PORTHOS  system  currently  in  use  on  the  IBM  709^/1^01  computer  complex  in  the 
Digital  Computer  Laboratory  of  the  University  of  Illinois.   This  system  is 
an  evolving  one.   Starting  in  mid-1962  and  using  the  University  of  Michigan 
Operating  System  as  a  much  appreciated  nucleus,  it  has  grown  and  will  continue 
to  grow  as  new  subsystems  and  convenient  features  are  added.   This  manual  is 
organized  in  such  a  way  that  this  growth  can  be  accommodated  by  means  of 
replacable  sections,  which  will  be  distributed  as  part  of  the  709^/1^01 
Bulletins  published  by  the  Laboratory. 

This  manual  and  the  system  itself  are  the  results  of  the  work  and 
efforts  of  a  large  group.   Lile  Murphree  has  acted  as  the  editor  and  coordinator 
of  the  user's  manual.   The  programming  system  is  the  result  of  the  work  of 
the  group  consisting  of  E.  Akemann,  R.  Alexander,  J.  Bagwell,  M.  Cloud,  M.  Cross, 
F.  Fischer,  J.  Flenner,  R.  Flenner,  M.  Foster,  E.  Hassler,  D.  Hutchinson, 
H.  Ivey,  J.  Lockhart,  K.  Modesitt,  J.  Moore,  S.  Musket,  W,  Skees,  R.  Troester, 
C.  Wilmot,  and  W.  Wulf.   The  Illinois -ALCOR  7090-709ij-  ALGOL  translator,  an 
integral  part  of  the  PORTHOS  system,  was  programmed  by  R.  Bayer,  D.  Gries, 
L.  Murphree,  M.  Paul  (ALCOR ),  M.  Rossin,  T.  Wang,  and  R.  Wiehle  ( ALCOR). 

It  must  be  noted  that  both  the  general  basic  structure  and  many  of 
the  details  of  the  PORTHOS  programming  system  rest  upon  the  advanced  planning 
and  structural  studies  of  Ross  Flenner  who  acted  as  Head  of  System  Programming 
from  the  inception  of  the  system  until  his  untimely  death  on  February  29,  196^. 
Thus  the  system  itself  serves  to  commemorate  his  memory  and  his  contributions. 


J .  Ehrman 
J.  N.  Snyder 

April  15,  I96U 
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APPENDICES 


Appendix  1.   Carriage  Control  Code 

The  first  character  of  each  record  determines  the  carriage  control 

for  printed  records.   This  character  is  detached  from  the  remainder  of  the 

record  and  is  not  printed.   The  code  for  the  carriage  control  character  under 

the  P^RTH0S  system  is  as  follows: 

Left-most  character 
for  pre-print  skip 

Single  space  blank  or  + 

Double  space  0 

Triple  space 

Sheet  eject  (skip  to  next  page)  1 

Skip  to  next  half  page  2 

Skip  to  next  quarter  page  k 

Skip  to  next  sixth  page  6 

The  itol  peripheral  processor  program  operates  in  the  following 
manner  for  the  above  control  characters;  a  discussion  of  the  carriage  tape 
channels  mentioned  below  may  be  found  in  Reference  Manual,  IBM  1401  Data 
Processing  System,  A24-lU03-5. 

blank  -  Spaces  one  line  before  printing. 

0  -  Spaces  two  lines  before  printing. 
+   -  Spaces  one  line  before  printing. 

-  Spaces  three  lines  before  printing.   The  blank,  0, 
and  -  are  changed  to  J,  K,  and  L  respectively  for 
proper  carriage  movement  within  the  1^01. 

1  -  Immediate  page  eject;  skip  to  channel  1. 

2  -  Skips  to  channel  2  and  spaces  one  line  before  printing. 

(Note:   The  spaces  following  the  skips  are  necessary  for 
proper  positioning  since  the  carriage  tape  can  have  only 
one  punch  on  each  horizontal  line) . 
k       -   Skips  to  channel  k   and  spaces  two  lines  before  printing. 
6   -  Skips  to  channel  6  and  spaces  three  lines  before  printing. 
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All  other  characters  space  one  line  on  the  printed  output.  Pre-print 
space  suppression  is  not  possible. 

The  carriage  tape  used  in  P0RTH0S  is  punched  as  follows: 

Channel  1  punches  in  13 ^  79 

Channel  2  punches  in  12,  k2 ,    78,  IO8 

Channel  3 punches  in  1^+,  27,  k3,    57,   80,  93,  109,  123 

Channel  h   punches  in  11,  26,  kl,    %,    77,  92,  IO7,  122 

Channel  5  punches  in  15,  28,  kh,    58,  8I,  9k,    110,  124 

Channel  6 punches  in  10,  20,  30,  1+0,  50,  60,  76,  86,  96, 

106,  116,  126 

Channel  7  punches  in  9,  25,  39,  55,  75,  91,  105,  121 

Channel  8  punches  in  8,  2k,    38,  5^,  7^,  90,  lOU,  120 

Channel  9  punches  in  6,  23,  37,  53,  72,  89,  103,  119 

Channel  10  ---  punches  in  5,  22,  36,  52,  71,  88,  102,  II8 

Channel  11  ---  punches  in  k,   21,  35,  51,  70,  87,  101,  II7 

Channel  12  punches  in  7,  8,  9,  10,  11,  73,  ^k,   75,  76,  77 

Only  the  characters  listed  previously  and  their  corresponding 
channels  (l,  2,  k,    6,  12)  have  any  significance  when  operating  under  P0RTH0S 
with  a  system  carriage  tape.  The  remaining  punches  in  the  tape  check  any 
skipping  that  would  result  from  the  use  of  characters  other  than  those  listed. 
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Only  the  characters  listed  previously  and  their  corresponding 
channels  (l,  2,    h,    6,    12)  have  any  significance  when  operating  under  the 
PORTHOS  system  with  a  system  carriage  tape.   The  remaining  punches  in  the 
tape  check  any  skipping  that  would  result  from  the  use  of  characters  other 
than  those  listed. 


Appendix  2o   input  Deck  Arrangement- 


Typical  Input  Deck 
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Appendix  3-   Categories  of  Input  Decks 

All  runs  submitted  to  the  709^-1^01  System  will  be  separated  into 
categories  which  are  defined  below: 


■~~-,,^tegory 
Requirements^ — -^^ 

Y 
(28018) 

Express 

I 

II 

and 
CalComp  Regular 

III 

and 

CalComp  Special 

Total  709^ 
time,  minutes 

2 

5 

10 

20 

no  limit 

Total  pages, 

including  copies 

10 

50 

100 

200 

no  limit 

Total  cards  out 

0 

100 

200 

no  limit 

no  limit 

Special 

requirements 

allowed 

none 

copies 

CRT 
copies 
tapes 

CRT 
copies 

tapes 

any 

Only  CalComp  jobs  are  acceptable  in  the  CalComp  categories,  and  only 
non-CalComp  Jobs  are  acceptable  in  the  other  categories .   In  addition  to  the 
above,  there  are  the  following  plotter  restrictions  on  CalComp  Regular  category: 

10- inch  plain  plotter  paper 
Any  plotter  pen  (usually,  but  not  necessarily,  blue  or 

black  ballpoint) 
No  special  plotter  requirements 
Category  Y  and  Math  195  Student  Homework  are  both  batched  separately 
and  run  normally  once  a  day  during  the  regular  5-day  work  week.   They  are  not 
run  on  weekends . 


Date: 
Section: 

10/1/66 
A-3. 

Page: 
Change : 

Por 

1 
2 
•thos  Manual 

APEEHDIX  h 


UNIVERSITY  OF  ILLIHOIS 

GRADUATE  COLLEGE 

DEPARTMENT  OF  COMPUTER  SCIENCE 

PROBLEM  SPECIFICATION  FORM  (ll) 


DO  NOT  WRITE  IN  THIS  SPACE 

Sequence  number 

Project  type 

Date  Received 


(See  attached  instructions  for  clarification.) 
(Return  to  Consultant  in  Room  111b,  ERL. ) 

Cii'  ^e  one:     ILLIAC  II,  IBM  709U,  Either      Date  of  submission_ 
Title  of  problem 


Prime  User 


Office  Address 


(b)   Department  ^ 
IS 

Phone 


Other  names  associated  with  running  of  this  problem 
1 


A I 1_J 1_ 


'  '  '  '.^y 


(c)   W 
5 


'  ■  ■  I 1 1 I — 1 — I — I I — 1 — 1 — I — t 


to 


i 1 1 I 1 — 1_ 


_1 I I 1 u 


-'J'/ 


7.^ 


J 1 I I L_ 


-I I I 1 1 L 1 1 1 1 1/ 


v  ''''''  ' 1  1  1  1  ■ 

tl 

C  J     1      1      1      1      I      1      1      1      1      1      1      .      1      I      1      1      1      1 

°  1    1    1    1    1    1    1    1    1    1    ,    1    1    1    1  . 1    1    1    J 

'v;! 


,  I  1  rain,  over  a  period  of  ,  ,  ,  months 


(d)  Type  of  Research  (circle  ONE):   Thesis^  Faculty,  Graduate,  Undergraduate 

(e)  Total  time  of  problem  ,  ,  ,  ,  hi; 

(f )  Billing  information  and  departmental  approval 

Source  of  funds  (i.e.,  contract  name  and  number )_ 

University  accounting  number 

Billing  address 


This  certifies  that  funds  have  been  allocated  to  support  the  above  amount  of 
computation  time. 


(Authorized  departmental  signature) 

(g)  SPECIAL  PROBLEM  REQUIREMENTS 

Fill  out  as  necessary.   If  filled  out,  explain  circuiristances  fully  on  reverse. 

(h)  No.  of  long  reserved  tapes   .  ,  ,      DCS 

No.  of  short  reserved  tapes  ,  ,  ,      DCS 
— — sv 

(J) 
(k) 
(m) 


LEASE 
LEASE 


BU^' 
BUY 


(n) 
(q) 


.41 
S9'- 


Low  density 

'Jp  to  ,  I  ,  copies  of  printed  output 

SI  SI. 

Special  cards  in  1402  punch 

Special  forms  on  1403  printer 

Own  input -output  programming 

Relinquishment  of  entire  machine  by  system 

CRT:   total  frames  for  problem   ,  ,  ,  ,  . 


DO  ROT  WRITE  IH  THIS  SPACE 
Problem  Specification  No. 


DCS  Approval 


Date  Processed_ 
Date  Mailed 


PLEASE  FILL  OUT  (Do  not  tear  off) 

Name Date 

Office  Address 

(if  possible) 


Phone 


Problem  Title 

(The  Problem  Title  should  be  unique  for  each  Problem 
Specification  handed  in  by  a  given  user  so  that  the  user 
can  identify  to  which  problem  this  returned  portion  of  the 
form  pertains. ) 

PROBLEM  SPECIFICATION  FORM 


DO  NOT  miTE  IN  THIS  SPACE 
Problem  Spejif ication  No. 


DCS  Approval 


Date  Received 
Date  Processed 


Date:   IO/1/660  Section;  A-^o,    Page;  l;  Change;,   3 


(r)  Please  describe  your  research  problem  here  according  to  the  standards  explained 
in  the  attached  instructions.   If  these  standards  are  not  followed,  the  form 
will  be  returned. 


EXPIANATION  OF  SPECIAL  REQUIREMENTS 
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UNIVERSITY  OF  ILLINOIS 

GRADUATK  COLLEGE 

DEPARTMENT  OF  COMPUTER  SCIENCE 

CLASS  PROBLEM  SPECIFICATION  FORM  (l) 


(Return  to  Consultant  in  Room  111b,  ERL.) 

Circle  one:    ILLIAC  II,  IBM  709'+,  Either    Date  of  submission 
Title  of  problem 


(a)   Instructor's  name 

Office  address 

Course  number 


,  1 I I I 1 I L. 


_j — I — 1 — 1 — I — 1_ 


M 


(b)  Dept.  .  , 


Phone 


,  ,  ,    section  number     number  of  students 
37     .  'J\  ■io'—'—'hi 


DO  NOT  WRITE  IN  THIS 
Sequence  No. 

SPACE 

Prob.  and  pro j .  type 

! 

i 

Date  Received 

(e)  Total  time  of  problem  j_ 


hours 


yy 


minutes  over  a  period  of  ,  ,  ,  months. 
70 —  II 


Term  in  which  number  is  intended  to  be  active:   Fall Spring Summer    of  I96 


(Authorized  Departmental  Signature) 


A  description  of  individual  class  problems  would  be  appreciated,  but  an 
application  may  be  used  to  apply  to  all  problems  in  a  given  course  by  writing  the  word 
"BLANKET"  on  the  reverse  of  this  form. 

An  instructor  may  request  to  have  a  subroutine  placed  in  the  system  library 
for  the  use  of  his  class  if  he  feels  this  will  be  beneficial.   He  should  see  the 
consultants  for  specific  arrangements. 

The  Problem  Specification  Number  assigned  to  this  problem  will  expire: 

1)  at  the  end  of  the  semester  in  which  it  is  first  used; 

2)  on  expiration  of  the  number  of  months  requested  above;  or 

3)  when  the  total  time  has  been  consumed; 
whichever  comes  first. 


DO  NOT  WRITE  IN  THIS  SPACE 
Problem  Specification  No. 


DCS  Approval 


Date  Processed 
Date  Mailed 


PLEASE  FILL  OUT  (Do  Not  Tear  Off) 

Name  Date 


Address 


(Office,  if  possible) 


Phone 


Course 


CLASS  PROBLEM  SPECIFICATION  FORM 


DO  NOT  WRITE  IN  THIS  SPACE 
Problem  Specification  No, 


DCS  Approval 


Date  Received 
Date  Processed 


Date:   IO/1/66,  Section;   A-UA,  Page:   1 


DESCRIPTION  OF  INBIVIDUAL  PROBLENB : 
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LIST  OP  DEPARTMENT  CODES 


If  your  department  or  office  does  not  appear  on  this  list,  please  write 
its  full  name  in  the  department  field  (b)  on  the  Problem  Specification  Form 
even  though  it  will  require  more  than  6  characters . 


ACCY 

ADMREC 

ADV 

AAE 

AGEC 

AGED 

AGE 

AGREXT 

AGRON 

ANS 

ANTH 

ARCH 

ART 

ASTR 

BOT 

BCMPL 

BECBSR 

BEDRES 

CZR 

CERE 

CHE 

CRC 

CP 

CE 

COMM 

DS 

DT 

DNSTUD 

DCS 

DGS 

DUE 

DOW 

ECON 

ED 

EDPSY 

EDADM 

EDTEST 

EE 

ENGADM 

ENGL3H 

EDO 

FIN 

FT 

FOR 

GENE 

GEOG 

GEOL 


Accountancy  GRDCOL 

Admissions  and  Records  G3BA 

Advertising  HED 

Aero,  and  Astro.  Eng.  HITHSV 

Agricultural  Economics  EEC 

Agricultural  Education  HONORS 

Agricultural  Eng.  HORT 

Agricultural  Extension  ILLDMH 

Agronomy  INADM 

Animal  Science  lED 

Anthropology  IE 

Architecture  lEEC 

Art  ICR 

Astronomy  IGPA 

Botany  ILR 

Bur.  of  Com.  Planning  LIR 

Bur.  of  Econ.  Bus.  Res.  LAW 

Bur,  of  Ed.  Res.  LIBS 

Center  for  Zoonoses  Res.  MKTG 

Ceramic  Engineering  MATRL 

Chem.  and  Chem.  Eng.  MATH 

Children's  Res.  Center  ME 

City  Planning  MEHA 

Civil  Engineering  MMPE 

Communications  MHARC 

Coordinated  Science  Lat .  MUSIC 

Dairy  Science  NHS 
Dairy  Technology           -  NUCE 

Dean  of  Students  OIR 

Dept .  of  Computer  Science  PEM 

Div.  of  General  Studies  PEW 

Div.  of  Univ.  Extension  PHIL 

Div.  of  Waterways  PHYCS 

Economics  PHYB 

Education  PHYK 

Education  Psychology  PHYSL 
Ed.  Admin,  and  Supervision    PLPA 

Educational  Testing  POLS 

Electrical  Engineering  PSYTRY 
Engineering  Administration    PSYCH 

English  REC 

Extension  Div.  Counseling  SHCBRC 

Finance  SOCW 

Food  Science  SOC 

Forestry  SCONS 

General  Engineering  SPCH 

Geography  SGS 

Geology  SWS 


Graduate  College 

Grad.  School  of  Bus.  Admin. 

Health  Education 

Health  Service 

Home  Economics 

Honors  Program 

Horticulture 

111.  Dept.  of  Mental  Health 

Industrial  Admin. 

Industrial  Education 

Industrial  Engineering 

Inst,  for  Res.  on  Exc .  Children 

Inst,  of  Communications  Res. 

Inst,  of  Gov.  and  Pub.  Affairs 

Inst,  of  Labor  and  Ind.  Rel . 

Labor  and  Indus .  Rel . 

Law 

Library  Science 

Market  ing 

Materials  Res.  Lab. 

Mathematics 

Mechanical  Engineering 

Men's  Residence  Hall  Asso. 

Mining,  Met.  and  Petro.  Eng. 

MRHA  Rocket  Club 

Music 

Natural  History  Survey 

Nuclear  Engineering 

Off.  of  Instruct.  Resources 

PE  for  Men  and  Grad.  PE 

PE  for  Women 

Philosophy 

Physics 

Physics  Betatron  Lab. 

Physics  Project  X 

Physiology  and  Biophysics 

Plant  Pathology 

Political  Science 

Psychiatry 


Psychology 
Recreation 

Small  Homes  Council 

Social  Work 

Sociology 

Soil  Conserv.  Ser . 

Speech  and  Theatre 
State  Geological  Survey 

State  Water  Survey 
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SSU  statistical  Services  Unit 

SCS  Student  Counseling  Ser. 

SRL  Survey  Res.  Lab. 

TAM  Theoret.  and  Appl .  Mech. 

USGS  U.S.  Geol.  Service 

UNIHI  University  High  School 

VAH  Vet.  Anatomy  and  Histology 

VCM  Vet.  Clinical  Med. 

VMS  Vet.  Med.  Science 

VPH  Vet .  Pathology  and  Hygiene 

VPP  Vet.  Physiol,  and  Pharmacology 

VTED  Vocational  and  Tech.  Ed. 

WPGU  WPGU  Radio  Station 

ZOOL  Zoology 

Chicago  Circle 

CCARCH  Architecture 

CCCHEM  Chemistry 

CCDME  Materials  Engineering 

CCENEE  Energy  Engineering 

CCGEOL  Geology 

CCPSYC  Psychology 

Medical  Center 

MCCL  Medical  Center  Computer  Lab. 

MEDIC  Medicine 

MRL  Medical  Research  Lab. 
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APPENDIX  6 


UHIYj^RSIT.    01''   ILLIilOIP 

uRADUATE  C(;iJ.;,Gi; 

DEPARTMENT  t)!'  COMPUTER  SCIESCK 
PROBLEM  PPECIFICATIOH  CHANGE  FORM  ( 8) 


(See  attached  instructions  for  clarification. ) 
(Return  to  Consultant  in  Roo o  111b,  ERL.) 

Information  above  double  lines  MUST  be  filled  out 


Date  Received 


Circle  one:   ILLIAC  II,  IBM  7091*,  Either    Date  of  submissioi: 

Original  problem  Wo.  Is  this  a  class  problem? 

Titlt  of  problem 

Submitted  by 


Office  address 

Billing  information  (Do  not  fill  in  for  Education/Trai;;ing) : 

Source  of  funds  (i.e.,  contract  name  and  number) 

University  accounting  number 

Billing  address 


Department 
Phone 


This  certifies  that  funds  have  been  allocated  to  support  the  computatioi;  time  requested 
and  authorizes  the  requested  changes. 


(Autr.orized  Departmental  Signature) 


(FILL  OUT  ONLY  ITE^E  WHICH  HA'/E  CHANGED,  AND  EXPTAIH  ON  RE^/ERSE) 
Cancel  this  number  (can  never  be  reactivated) 


(a)   Prime  user 

Other  names  associated  with  tnls  probleif 

1  D, 


Put 


^^x  .. 


3  D'. 


(d) 
(e) 

(f) 
(g) 


Change 


^.'  D.^— 


-Uy 


'4,1'- 


J L. 


-"iO 


D. 


I 1 i_ 


added,  "D"  i  r  delr-Li  I 


Tj'pe  of  Research  to  (Circle  one):   Thesis,  Undergraduate,  Graduate,  Facult,. 


^7t 


Total  t 


increase 
decrease 


increase 
decrease 


3i, 

time  by  ,    ,    ,     ,   hrs .      min. 
11  it       'J7^^V? 

I   I   Check  this  box  if  billing  information  above  has  changed. 

SPECIAL  PROBLEM  REQUIREMENTS 
Reserved  tape  requirements : 


time  by 
ID 


months 


(h)  Do  you  wish  all  tapes  previously  assigned  to  you  to  be  removed?  YES 


NO 


If  you  wish  to  have  removed  some  tapes  previously  assigned  to  you,  list  on  the  back 

of  this  form  the  labels  of  the  tapes  you  wish  to  retain. 

Additional  number  of  long  reserved  tapes  ,  .  ,  ORIGIN:   DCS  LEASE  BUY  

Additional  number  of  short  reserved  tapes,  .  ,^  ORIGIN:   DCS  LEASE  BUY  

Give  length  of  time  for  each  new  tape  on  reverse. 
Place  in  box  by  special  requirement  an  "A"  if  requirement  is  to  be  added,  "D"  if  deleted. 
(j\}       I  Low  dens  it 


,._,  __„     .  copies  of  printed  output 

(m^y T  Special  cards  in  1402  punch 

ifl       I  Special  forms  on  l't03  printer 
i^'y       I  Own  input -output  programniing 
(py   I  Relinquishment  of  entire  machine  by  system 


(q)  I   I  CRT:  Total  add.  frames  for  problem  , 


DO  NOT  VffilTE  IN  THIS  SPACE 
Problem  Specification  No. 


DCS  Approval 


Date  processed 
Date  Mailed 


PLEASE  FILL  OUT  (Do  Not  Tear  Off) 

Name  Dat^ 

Address 


(Office,  if  possible) 


Phone 


Prob.  Spec.  No. 


PROBLEM  SPECIFICATION  CHANGE  FORM 


ro  KOT  WRITE  IN  THIS 
DCS  Appro »al 

SPACE 

Date  Received 
Date  Processed 

Date;   10/1/66^  Section.   A-6b,  Page   1-  Change   3 


Please  explain  reasons  for  changes. 


Date:   10/1/66;  Section:   A-6.;  Page:   2;  Change:   3 
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UNIVERSITY  OF  ILLINOIS 
GRADUATE  COLLEGE 
DEPARTMENT  OF  COMPUTER  SCIENCE 

REQUEST  FOR  TAPE  LEASE,  TAPE  LEASE  RENEWAL,  TAPE  PURCHASE,  OR  TAPE  LABELLING 


Please  Fill  in 

Name        ^Dat  e 

University  Address Department 

Phone  Number ^Original  Assigned  Problem  Nuniber_ 

Title  of  Problem 


Fill  out  this  portion,  if  tapes  are  to  be  leased  or  purchased,  or  if  a  tape  lease  is  to  be 

renewed.   The  lease  period  is  two  years.  The  lease  price  is  the  price  of  the  tape.   The 

Department  of  Computer  Science  will  store  leased  tapes. 

Number  of  Tapes  to  be  leased:  Short  (1200') 

Long  (2UOO') 


Number  of  Tapes  whose  leases  are  to  be  renewed:  Short  (1200') 

Long   (2U0O')" 

Labels  on  Tapes 


Number  of  Tapes  to  be  purchased:   Short  (1200') 

Long   (2UOO') 

Billing  Information  and  Departmental  Approval 

Source  of  Funds  (i.e..  Contract  tTame  and  Number )_ 

University  A.ccounting  Number 

Billing  Address 


This  certifies  that  funds  have  been  allocated  to  support  the  above  cost  of  tape(s). 


(Authorized  Departmental  Signature) 


Fill  out  this  portion,  if  tapes  owned  by  the  user  are  tc  be  labelled,  and  hand  in  with  the 
tapes  which  are  to  be  externally  labelled  with  your  name  and  problem  number.   Only  heavy  duty 
tapes  stored  under  acceptable  conditions  can  be  placed  en  the  system.  Make  sure  your  tape 
reels  are  identified  with  your  name,  problem  number,  and  department. 


Number  of  Tapes  to  be  labelled:   Short 

Long 


Do  not  Write  in  This  Portion 

Date  Received by_ 

Date  Labelled by_ 

Date  Reserved by_ 

Remarks : 


Please  Fill  In  This  Portion 

Name  Date 


University  Address Department 

Phone  Number ^Original  Assigned  Problem  Number 

Title  of  Problem 


DO  NOT  FILL  IN:     Your  Tape   Identification  Numbers  are: 


Leased  tapes  will  be   stored  by  DCS.      Please  Pick  Up  Your  Owner  Tapes   in  110a  ERL. 
Date:      IO/1/66;    Section:      A-y.;   Page:      1;    Change:      1 


Appendix  8. 

Table  of  Permissible  Characters 

A-8.1  In  Alphabetic  Order 


Char- 
acter 

Punched 
Card 
Code 

BCD 

Code  in 
Storage 
(Octal) 

BCD 

Code  on 
Tape 

(Octal) 

blank 

blank 

60 

Uo 

0 

0 

00 

12 

1 

1 

01 

01 

2 

2 

02 

02 

3 

3 

03 

03 

k 

h 

o4 

04 

5 

5 

05 

05 

6 

D 

o6 

06 

7 

7 

07 

07 

8 

8 

10 

10 

9 

9 

11 

11 

A 

12 

1 

21 

61 

B 

12 
2 

22 

62 

C 

12 
3 

23 

63 

D 

12 

2h 

64 

E 

12 

25 

65 

F 

12 
6 

26 

(,G 

G 

12 
7 

27 

67 

H 

12 
8 

30 

70 

I 

12 
9 

31 

71 

J 

11 

1 

41 

41 

K 

11 
2 

J42 

42 

L 

11 

3 

43 

43 

M 

11 

4U 

44 

W 

11 
5 

45 

45 

Char- , 
acter 

Punched 
Card 
Code 

BCD 

Code  in 
Storage 
(Octal) 

BCD 

Code  on 
Tape 
(Octal) 

0 

11 
6 

46 

46 

P 

11 
7 

47 

47 

Q 

11 
8 

50 

50 

R 

11 

9 

51 

51 

S 

0 
2 

62 

22 

T 

0 

3 

63 

23 

U 

0 
4 

64 

24 

V 

0 
5 

65 

25 

w 

0 

6 

66 

26 

X 

0 
7 

67 

27 

Y 

0 

8 

70 

30 

z 

0 

9 

71 

31 

= 

3-8 

13 

13 

( 

0 
4-8 

74 

34 

) 

12 

4-8 

3^ 

74 

t  +0 

12 
0 

32 

72 

t  -0 

11 

0 

52 

52 

W   ' 

4-8 

14 

14 

+ 

12 

20 

60 

- 

11 

40 

4o 

* 

11 
4-8 

54 

54 

/ 

0 
1 

61 

21 

$ 

11 
3-8 

53 

53 

> 

0 
3-8 

73 

33 

1 

12 

3-8 

33 

73 

t  This  character  is  not  normally  used,  .   - , 

and  will  not  be  considered  a  sign. 

IT  On  some  keypunches  the  apostrophe  prints  as  a  dashi   It  will  not  be 

considered  a  sign. 
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A-Q.2  In  Core-Storage  Notation  Order 


Char- 
acter 

Punched 
Card 
Code 

BCD 

Code  in 
Storage 
(Octal 

BCD 

Code  on 
Tape 
(Octal) J 

0 

0 

00 

12 

1 

1 

01 

01 

2 

2 

02 

02 

3 

3 

03 

03 

k 

4- 

ok 

Oh 

5 

5 

05 

05 

6 

6 

o6 

06 

7 

7 

07 

07 

8 

8 

10 

10 

9 

9 

11 

11 

= 

3-8 

13 

13 

+i  ' 

U-8 

1^ 

111 

+ 

12 

20 

6o 

A 

12 

1 

21 

6i 

B 

12 

£_ 

22 

■j^^ 

C 

12 
3 

23 

63 

D 

12 

24 

6U 

E 

12 
5 

25 

65 

F 

12 
6 

26 

66 

G 

12 
7 

27 

67 

H 

12 
8 

30 

70 

I 

12 
9 

31 

71 

f  +0 

12 

0 

32 

72 

• 

12 
3-8 

33 

73 

) 

12 

3h 

Ih 

Char- 
acter 

Punched 
Card 
Code 

BCD 

Code  in 
Storage 
(Octal) 

BCD 

Code  on 
Tape 
(Octal) 

- 

11 

ko 

40 

J 

11 

1 

41 

4i 

K 

,11 
2 

42 

42 

L 

11 
3 

43 

^3 

M 

11 
k 

44 

44 

W 

11 
5 

45 

45 

0 

11 
6 

46 

46 

P 

11 
7 

47 

47 

Q 

11 

8 

50 

50 

H 

11 

9 

51 

51 

t-0 

11 
0 

52 

52 

$ 

11 

V8 

53 

53 

■)f 

11 
4-8 

54 

54 

"blanli 

blanli 

60 

40 

/ 

0 
1 

61 

21 

S 

0 

2 

62 

22 

T 

0 

3 

63 

23 

U 

0 

h 

64 

24 

V 

0 
5 

65 

25 

w 

0 

6 

66 

26 

X 

0 

7 

67 

27 

Y 

0 
8 

70 

30 

Z 

0 

0 

71 

31 

} 

0 
3-8 

73 

33 

( 

0 

74 

34 

I  Tliis  character  is  not  normally  UGed, 

and  will  not  be  considered  a  sign.      •  -  .   j 

TT  On  some  keypunches  the  apostrophe  prints  as  a  dash.   It  will  not  b€ 

considered  a  sign. 
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A.ppendix  9,   $  Control  Card  Suinmary 

Those  which  are  underlined  below  pertain  to  the  execution  phase 
or  to  the  running  of  the  whole  job  and  must  appear,  if  used,  in  the  first 
group  of  $  control  cards  in  the  job  deck. 


ALGsZiL 
FASTRM 

F^RTRm   IBM 

IPL-V 

L?G1 


MAD 

SGATRE 

SWg^B0L 

SPS/90 

SSUI-AC 


STRESS 

uiedit(n) 


BIHARY 

brme;(w) 
cal:0me'Cn) 

CLEMUP. 

n0PIES(N) 

DATA 


.Process  the  c\ 
Compile  the 
Assemble  the  S( 
Interpret  the/ 
Assemble  the 


Compile  the  ALGpL  program  that  follows. 

Compile  th.e  FORTRAN  II  prograni  that  follows  with  the 

FASIRAN  compiler. 

Compile  the  F0RTRAN  II  program  that  follows  with  the 

IBM  P0RTrXJ)J  compiler. 

Interpret  thp  IPL--V jfrogram  that  follows. 

ds  Imat  follow  with  the  LPGl  program, 
"ogram  that  follows. 
CRE  program  that  follows. 
■Ep^^^L   program,  that  follows. 
fo.lI.o\ing  .lUoi  SPS  program.. 
Use  the  StatisticaliServices  Unit  package  of  statistical 
progi'ams. 

Interpret  the  STRESS  program  that  follows. 
UIEDIT  will  be  used  to  copy,  compare,  and  edit  tapes 
under  the  control  of  "the  UIEDIT  command  cards  found  on 
tape  W.   (If  N  is  om.itted,  pit  is  assumed  to  be  3») 
Indi";ates  rhat  a.ll  cards  foiJ.owing  (up  until  a  ■$  DATA  card) 
are  column  binai/y. 

Marks  the  end  of  each  core-^load  in  a  multj.ple  core-load  job. 
The  parameter  N  refers  to  a  logical  tape  unit. 
Indicates  that  the  job  fo.l.Lowing  wil.l  use  at  most  N  inches 
of  papei-  on  the  CalCoirjp  plotter.   (The  job  miist  be  in  a 
'Jai;;omp  category.  ) 

Allows  the  user  to  regain  contro.1  of  the  computer  for  a  short 
time  after  termination  via  SYSERR  or  by  operator  intervention, 
through  the  SYSCUP  subroutine. 

Causes  K  copies  of  the  output  following  to  be  printed  until 
either  another  $  C0PIES(]M)  card  or  the  end  of  the  job  appears. 
Defines  the  information  that  follows  this  card  to  be  data. 
This  must  always  precede  the  first  data  card. 
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DUMP 


DUMP  0NLy  (X) 


FULL  DUMP 


G^ 


HALT 


I 70  DUMP 

LIE  DUMP 

LIBRARY  E0F 

LIBRIT 
0M  1 70 

PRINT  0BJECT 

PUNCH  0BJECT 


PUNCH  R(2(W 
BINARY 


REM0VE  TAPES 


SUBTRACE 


D^Jinp  the  user's  program  and  ERASABLE  in  case  of  trouble 

(other  than  input-output  trouble) . 

Inhibit  all  of  the  output  except  the  dumpo   'X'  is  a  logical 

scratch  tape  unit  on  channel  A  (U„  10,  8)  >. 

Dump  everything  from  lOOOOn  to  77777o  in  case  of  trouble 

(other  than  input  - output  trouble) o 

Execute  the  instructions  compiled,  assembled,  or  read  in 

during  the  processing  of  this  jobo   (If  an  error  occurs 

during  the  processing,  no  execution  will  take  place.) 

Stop  the  computer  to  allow  the  operator  to  take  action 

indicated  on  comment  cards  ($  in  colijmns  1  and  2)  ,     This 

is  effective  only  if  comments  have  preceded. 

Give  dump  as  indicated  even  if  input-output  trouble. 

(Must  be  accompanied  by  DUMP-,  FULL  DUMP  or  LIBDUMP.) 

Same   as  DUlff,  tJit  ?/stan    library  routines   called  by  the 

user  are  dumped  as  well. 

Causes   an  end-of-file  mark  to  be  written  on  the  execution 

tape . 

Build  a  library  using  the  library  writer. 

Permit  the  user  to  do  his  own  input-output  programming 

with  actual  select  instructions. 

Print  the  object  program  that  results  from  the  c-orrent 

MAD,,  FASTRAN,  or  F0RTRAN  IBM  translation. 

Punch,  in  column  binary  form,  the  object  program  generated 

by  the  current  MAD,  F0RTRAN  IBM,  SCATRE,  ALG0L,  or  FASTRAN 

compilation. 

Punch  the  program  that  follows  in  row  binary  form.  The 

deck  produced  can  only  be  loaded  on-line  in  a  relinquish 

job. 

Causes  the  computer  to  halt  at  the  end  of  the  job  for 

removal  of  user's  reserved  tapes. 

Causes  the  user's  program  to  be  linked  by  the  loader  in  a 

manner  to  permit  a  message  to  be  printed  out  at  every 

subroutine  call.   (Program  must  contain  a  CALL  0NTRAC  to 

turn  on,  and  can  contain  a  CALL  0FTRAC  to  turn  off.) 
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TEST 


T.DDMP 


The  program  which  follows  will  be  run  under  a  test  version 
of  a  system  program.   The  user  should  see  a  consultant 
before  using  this  control  card. 

At  the  end  of  this  program^  use  the  disk  and  tape  dump  program 
according  to  the  parameter  specification  on  the  comment  cards 
at  the  beginning  of  the  job. 
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Appendix  10.   System  Symbols 


The  following  is  a  summary  list  of  system  symbols  available  to  the 
user  with  a  short  description  of  their  function.  These  symbols  are  auto- 
matically defined  by  SCATRE.  Those  system  symbols  which  refer  to  subroutines 
are  listed  first.  These  are  followed  by  the  remaining  system  symbols. 


SYSBSF 
SYSBSR 
SYSCAP 
SYSCCC 
SYSCCD 
SYSCCK 
SYSCLN 
SYSCPC 
SYSCPP 
SYS CUP 
SYSDMC 
SYSD0D 
SYSEKR 

SYSFPT 
SYSHPR 
SYSLIT 
SYSLSR 
SYSPCB 
SYSPCD 
SYSPAN 
SYSPPD 
SYSPSE 
SYSRDD 
SYSREW 
SYSRIT 
SYSRUB 
SYSRUD 
SYSSAP 


Backspace  file 

Backspace  record 

Comment  attached  printer 

Change  copies  count 

Change  card  count 

Change  clock  trap 

Change  line  count 

Change  1^02  punch  cards 

Change  1U03  printer  paper 

Clean  up 

Same  as  SY3PAN  (Dump  machine  conditions) 

Dynamic  octal  dump 

Error  return  from  execution.   If  a  d'omp  control  card 

was  included  in  the  program,  a  diamp  will  be  produced. 

Set  floating  point  trap  return 

Halt 

Look  at  input  tape 

Load  system  record 

Punch  card  binary 

Punch  card  decimal 

Panel  conditions  dump 

Print  and  paunch  decimal 

Execute  'P3E  536'  to  change  CRT  film  frame 

Read  from  disk 

Rewind  unit 

Read  input  tape 

Read  unit  binary 

Read  unit  decimal 

Skip  attached  printer 
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SYSSIT 
SYSSKF 
SYSSKE 
SYSSPR 
SYSSTR 
SYSTEM 


SYSTOW 
SYSTTR 
SYSWEF 
SYSWHY 
SYSW0T 
SYSWRD 
SYSWUB 
SYSWUD 


Skip  a  record  on  system  input  tape 

Skip  file 

Skip  record. 

Set  memory  protect  violation  return 

Set  'STR'  return 

Normal  return  from  execution.  No  dumps  will  be 

given  under  any  circumstances  (even  though  requested 

by  means  of  dump  control  cards) . 

Trap  or  wait 

Set  transfer  trap  return 

Write  end-of-file 

Prints    'WHAT  WERE  Y^J  DOING  AT  LjZ!iC  XXXXX.' 

Write  output  tape 

Write  on  disk  '^ 

Write  unit  binary 

Write  unit  decimal 


SYSAUl        Channel  A  unit,  currently  logical  h 

SYSAU2        Channel  A  unit,  currently  logical  10 

SYSAU3*       Channel  A  unit,  currently  logical  8 

SYSBRK       Decrement  of  cell  contains  program  break 

SYSBUl        Channel  B  unit,  currently  logical  9 

SYSBU2        Channel  B  unit,  currently  logical  2  (ping-pong  tape) 

SYSBU3        Channel  B  unit,  currently  logical  3  (execution  tape) 

SYSCDL        Cell  containing  number  of  cards  left  of  user's  punched 

card  estimate 
SYSCLK        Location  of  core  clock 

SYSC0T        CalComp  output  tape,  currently  logical  5 
SYSCTC        Cell  containing  the  current  time  class 

(O  =  execution  time) 
SYSDAT        Cell  containing  the  current  date  (in  6  BCD  characters 

MMDDYY;  month,  day,  and  year) 
SYSEND       User  program  area  end,  currently  77777q 


*The  user  should  restrict  himself,  if  possible,  to  units  AUl,  AU2,  BUI,  BU2, 
and  BU3  for  scratch  use  since  AU3  may  possibly  be  unready,  and  requires  a 
$$  comment  card  for  use. 
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SYSENT 
SYSIDC 
SYS.DF 

SYS.  NT 
SYS.RA 
SYS.TD 

SYS.TT 
SYS. TV 
SYSLAH 
SYSLIN 
SYSLNL 

SYSMDO 
SYSMDl 
SySM)25N 
SYSMTl 
SYS^RG 
SYSPIT 
SYSP0T 


Entry  to  program  read  by  SYSLSR 

Location  of  ID  card  image 

Cell  containing  dumpflag  word  for  program  being 

executed 

Number  of  logical  unit  numbers  in  tape  table 

Cell  containing  current  relocation  amount 

Cell  containing  the  time  of  day  in  60'th  of  seconds 

since  midnight 

Tape  table  origin 

Origin  of  system  transfer  vectors 

Cell  containing  the  input  tape  look- ahead  flag 

Cell  containing  number  of  lines  written  on  SYSP0T 

Cell  containing  number  of  lines  left  of  user's 

printed  output  estimate 

Disk  module  0,,  logical  number  ik 

Disk  module  1,,  logical  number  15 

Origin  of  system  M0NIT0R 

System  master  tape^  currently  logical  1 

User  program  area  origin;,  currently  lOOOOn 

Peripheral  input  tape,  currently  logical  7 

Peripheral  output  tape,  cirrrently  logical  6 
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Appendix  11 «  Siimmary  of  System  and  Error  Messages 

All.l  General 

This  appendix  contains,  for  each  of  the  various  components  of  the 
system,  a  list  of  the  possible  messages  which  the  user  may  receive  on  his 
output.   An  explanation  of  the  cause  of  the  message  is  given  where  necessary. 
In  the  case  of  error  messages,  possible  remedies  may  also  be  suggested. 
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All. 2  Execution  Coordination  Routines  (ECR),  Monitor  (M,i5n),  Loader  (LDR) 
and  Disk  Execution  Coordination  Routines  (DECR)  Messages 

A  Daily  Message  Mj^W 

***  AC  JZSF  TR  ECR 

AT  LC  X>jODC 

***  AC  U?  TR  ECR 

AT  LC  XXXXX 

XXXX  ADDITIONAL  CARDS  WERE  N0T  READ  M0N 

****   ALL  IWFJT  DATA  m^VE.   BEEN  PR.^^CESSED  ECR 

AT  LC  XXXXX 

AS  0F  MM/DD/IY,  REMAINING  CHARGEABLE  TIME  REQUESTED  IS  HUH  MM.   SS.S      MjZiN 

AS  pF   THIS  RUN,  REMAINING  CREDIT  TIME  IS  HHH  MM  SS.S  M0N 

***  BAD  C/C  LIST  ECR 

AT  LC  XXXXX 

BECAUSE  p?  A   BAD  SP0T  0N  SYSPIT,  M^N 

Y^UR  REMAINING  CARDS  (IF  ANY)  HAVE  N0T  BEEN  COUNTED. 

BINARY  INPUT  T0  TRANSIAT0Ro   J0B  DELETED.  M0N 

****   C-AKO  ESTIMATE  EXCEEDED  ECR 

AT  LC  xxx^a: 

XX  CARDS  'TIL  $  CARD  M0N 

CHECKSUM  LDR 

CHECKSUM  DISCREPANCY  MjZJn 

DISK  ERR0R,  TRACK  XXXXX  Mj^D  X  J^PN  X  CHK  X  SENSE  XXXXXXXXXXXX           DECR 

DISK  LIBRARY  L0ADER  CANN0T  L0AD  m/>RS  THAN  60  LDR 

LIBRARY  R0UTINE3~-SEE  C0NSULT.ANT 

DISK  LIBRARY  PJEIC^RD  TRACK  CANN0T  BE  RE-AD  -  LDR 

SENSE  W0RD  1  XXXXXXXXXXXX 
LIBPuARY  WILL  BE  READ  FR0M  TAl^ 

$$  CARDS  N)Z$T  IMMEDLA.TELY  AFTER  ID  CARD.   JpB  DELETED.  ]y0N 

DP  ERR0R  TR 

AT   LC  ZOOCXX  -  ECR 

ELAPSED  TIME   IN  HRS-fflNS-SECS,    (HH  Ml  SS.S)  M0N 

-  T0TAL   -   Gj^TIME   -  M0NITR    -  L0ADER   -    (various   translator   times) 

-  CAPJ)S   PUI^ICHED    -  CARDS    INPUT   -  LINES  HUNTED 

KXECUTI0N  TAPE   IS  EITHER  BAD  0R  THK^IE   IS  AN   ILLEGAL  BCD  CARD  LDR 

***  EXECUTI0N  TERMINATED   VIA  SYSERR  ECR 

FIRST  CARD  N0T  A  PR0C-RAM  CARD  LDR 
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G00D  SHpW  M0N 

*^*  HANGUP  ECR 
AT  LC  XXXXX 

****  HjZ5LD  BUF7ER  FULL  ECR 

ILLEGAL  BCD  CARD  LDR 

ILLEGAL  BINARY  TRANS  IT  IjZSW  CARD  LDR 

ILLEGAL  DEFT.   J0B  DELETED.  M0N 

ILLEGAL  DISK  l/0  CALL  DECR 

**  ILLEGAL  DISK  SPECIFICATIjZiN  DECR 

ILLEGAL  ENTRY  NAME  XXXXXX  LDR 

ILLEGAL  ID  CARD.  M)Z5n 

ILLEGAL  LjZ5ADING  ADDRESS  LDR 

****   ILLEGAL  L0W  C0RE  FUNCTION  USED  ECR 
AT  LC  XXXXX 

ILLEGAL  NAJvIEo      JjZiB  DELETED.  MpN 

ILLEGAL  PERMISSI0N  CARD-      J0B  DELETED.  MjZ5n 

ILLEGAL    (PLACEMEj}]T  0F)   $   C0NTR0L  CARD.      JjZSB  DELETED.                                               MjZiN 

ILLEGAL  PS  N0O      JjZiB  DELETED.  M0N 

ILLGL  REQST  ECR 
AT  LC  XXXXX 

****   ILLEGAL  UNIT   IN  l/jZS  CpNTR0L  ECR 
AT  LC  XXXXX 

ILLEGAL  USE  ^F  FULL  C0RE  LEADING  LDR 

IMPROPERLY  PLACED   BCD  CARD.      J0B  DELETED.                                                                         M)Z5n 

IMCTIVE  PS  NjZS.  M0N 

INCORRECT  TAPE  NjZ5.    jZiN  $  BINARY  ^R  $  BREAK                                                                        M0N 

INVALID  STR-TTR  ECR 
AT  LC  XXXXX 

****   IRRECOVERABLE  DISK  ERR0R  DECR 

J^B  N0.  XXXX  DELETED.  MpN 

****  JpB  jZ5VERTIME  ECR 
AT  LC  X]QCXX 

•JjZiiB   TERMINATED  AND  RESTARTED  BY  0PERAT)25r  M0N 

JpB  VIOLATES   CATEGORY  C0NDITI0NS.  RESUBMIT  J0B   IN  PR0PER  CATEGjZiRY              M0N 

LIBRARY  CANN0T  BE  L0ADED  PRjZiBABLY  DUE  T0   S0ME  INCONSISTENCY   IN                        LDR 
ENTRY  NAMES 

LIBRARY  CHECKSUM  ERR0R  LDR 
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xxxxx  ldcs,  can  be  safely  used  in  expanding  pr0g.  (0ctal)  ldr 

***  l;z50ping  ecr 
at  lc  xxxxx 

***  l0w  c0re  system  destroyed  ecr 

*  lsr  rod  n0t  end  ecr 

*  lsr  x-sum  ecr 

MAP  LDR 

MAP  (SPLIT  CpRE   L^AD)  LDR 

^**   MQ  0F  TR  ECR 
AT  LC  XXXXX 

***   MQ  UF  TR  ECR 
AT  LC  XXXXX 

N0  CjZSPIES  PERMISSION  pR   EXCESSIVE  REQUEST.  MjZiN 

NjZ5  $  C)ZiNTR0L  CARD.   J0B  DELETED.  M^N 

N0  MAIN  PRdGRAM  LDR 

N0  REC)^RD  F0UND  DECR 

N0   S-8   J)ZiB   CARD.      J^B  DELETED.  UpN 

0peratjzir  intervention  during  execution  ecr 

***  Overtime  ecr 

AT  LC  XXXXiC 

***  PAGE  ESTIMATE  EXCEEDED  ECR 
AT  LC  XXXXX 

PARTIALLY  LEADED  RECORD  LDR 

**  PGM  ST0P  ECR 
AT  LC  JJXXX 

PR0GRAM  Am  ERAS.      pYERlAP   BY  XXXXX  L0CS;  (0CTAL)  LDR 

PROGRAM  On  TAPE  XXXXX,  ID  =  XXXXX  (OCTAL)  LDR 

■x-^-jfx  PROTECT  VIC^I^-TldN  ECR 
AT  LC  XXXXX 

REDUMANCY  RETURN  FRpU   DISK  ROUTINE  AT  LOC  IN  IR5  M^N 
SENSl  =  XXXXXXXXXXXX 
SENS2  -  XXXXXXXXXXXX 

REMAINING  jpB  TIME  TOO  SMALL,   jOb  TERMINATED.  MjZiN 

RETURN  THIS  OUTPUT  TO  CLINT,  RM  l60  MON 
MISPLACED  CONTROL  WORDS 

REIURN  THIS  OUTPUT  TO  CLINT,  RM  l60  MON 
REDUNDANCY 
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R0UTING  R00M  PEKS0mCEL  RETURN  THIS  ¥iW 

PAGE  TjZi  CAKDY  WILM0T,  RM  l62 
[disk  redundancy  message] 
WHILE  UPDATING  PS  N0.  XXXXX 

SUBR0UTIKE  XXXXXX  APPEARS  M0RE  THAN  0NCE  LDR 

FIRST  JZSNE  L0ADED  WILL  BE  USED 

SUBROUTINES  NJZST  AVAILABLE  FR0M  THE  LIBRARY  LDR 

EXECUTION  WILL  PR0CEED  F0R  15  SEC.  <pR   UNTIL  A  MISSING  SUB.  IS  CALLED 

TAPE  XX  IS  BAD  ECR 

AT  LC  XXXXX 

TAPE  XX  IS  FULL  ECR 

AT  LC  XXXXX 

THE  FIRST  CARD  Nj^T  RKAD  WAS  (followed  by  BCD  card  image)  M^N 

THIS  J0B  SH0ULD  HAVE  BEEN  RELOADED  DUE  T0  ERR0RS  0N  SYSPIT.             M0N 

THIS  PS  EXPIRES  MM/DD/YY  M0N 

T0TAL  TIME  .G.  REMAINING  PS  TIME.  M0N 

2  MAIN  PROGRAMS  LDR 

UNSUCCESSFUL  EDIT.  M0N 

****  WHAT  WERE  YJZ5U  DjZJiNG  ECR 

AT  LC  XXXXX 

W0RD  C0UNT  LDR 

WRITE  CHECK  FAILURE  DECR 
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All. 3  Monitor  Messages 

XXXX  ADDITIjZiNAL  CARDS  WERE  N^T  READ. 

This  message  is  printed  at  the  end  of  a  job  following  the  message 
'THE  FIRST  CARD  W0T  READ  ...'.   The  word  'ADDITI^NAi'  is  preceded  by 
the  count  of  cards  not  processed  by  the  job  at  the  time  it  was 
terminated. 

AS  0F  ym/m/Tf  remaining  chargeable  time  requested  is  hhh  mm  ss.s 

This  message  is  printed  as  part  of  each  job's  accounting  information. 
Since  chargeable  time  is  not  reduced  on  the  disk  at  the  time  a  job 
is  run  but  is  instead  reduced  several  days  later  according  to  the 
time  card  punched  on-line  for  the  job^  the  time  printed  following 
the  words  '...  REQUESTED  IS'  is  the  time  remaining  on  the  date  printed 
after  the  words  'AS  ^F'. 

AS  pF   THIS  mm,   remaining  credit  time  is  hhh  mm  SS.S 

Since  the  M0NIT0R  reduces  the  credit  time  of  a  given  ?.S.  n'umber 

at  the  time  a  job  is  run  under  that  P.S.  number,  the  amount  of 

tim„e  printed  after  the  words  '...  TIME  IS'  is  the  exact  amount  of  credit 

time  rem.aining. 

BECAUSE  0F  A  BAD  SP0T  0N  SYSPIT,  Y015R  REMAINING  CARDS  (IF  ANY)  HA\^  N0T  BEEN 

C0UWTED 

This  message  replaces  the  TKTA   ADDITI0NAL  CARDS  WERE  N0T  READ' 
message  if  the  M0NIT0R  cannot  read  the  remaining  cards  because  of 
redundancies  on  the  input  tape.   The  job  has  already  been  entirely 
processed^  so  it  need  not  be  reloaded. 

BINARY  INPUT  T0  TRANSLAT0R.   J^B  DELETED. 

The  only  translator  which  has  input  in  the  form  of  binary  cards 
is  SGATRE,  and  the  binary  cards,  in  this  case,  must  be  preceded  by 
the  appropriate  pseudo-op  on  a  BCD  card. 
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XX  CAEDS  'TIL  $  CARD 

The  number  printed  before  the  word  'CARDS...'  is  the  number  of 
cards  the  M0NIT0R  had  to  bypass  after  a  return  from  a  translator 
in  order  to  encounter  the  next  $  control  card  of  the  job. 

CHECKSUM  DISCREPANCY 

The  M0NIT0R  performs  a  checksiim  on  each  binary  card  it  reads 
and  terminates  the  job  if  the  checksum  is  incorrect. 

$$  CARDS  N0T  IMMEDIATELY  AFTER  ID  CARD.  JpE   DELETED. 

$•$  comment  cards  may  not  appear  anywhere  in  an  input  deck 
except  immediately  following  the  ID  card. 

ELAPSED  TIME  IN  HRS-MIWS-SECS.   (HH  MM  SS.S)  -  T0TAL  -  C-0TIME  -  M0NITR  - 
L0ADER  -  (various  translator  times)  -  CARDS  PUNCHED  -  CARDS  INFJT  -  LINES  PRINTED 
This  message  appears  on  the  tail  sheet  of  every  job  run  on  the  709^» 
It  tells  the  total  time^  the  execution  time^  the  system  time^  the 
loader  time  and  the  translator  times  on  this  job.   It  also  indicates 
the  number  of  cards  punched  (including  the  ID  card  but  not  the 
separator  card),  the  number  of  cards  input  (not  including  the  S-8 
card),  and  the  total  number  of  lines  printed. 

GjZ^0D  SH0W 

This  message  is  printed  after  a  successful  edit. 

ILLEGAL  XXXXXX  J0B  DELETED. 

The  word  'ILLEGAL'  will  be  followed  by  one  of... 

PS  NO. 

DEPT. 

NAME 

One  of  these  fields  is  incorrect. 

ILLEGAL  ID  CARD. 

Column  1  is  non-blank,  or  one  of  the  required  fields 
is  in  error. 
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ILLEGAL  PERMISSION  CARD.   J0B  DELETED. 

The  binary  card  following  the  S-8  card  is  not  one  of  the  allowed 
permission  cards. 

ILLEGAL  (PLACEMENT  JZSf)  $  C0NTR0L  CARD.   Jj^B  DELETED. 

This  is  printed  when  a  $  control  function  is  incorrectly  spelled 
or  when  the  card  appears  in  an  improper  place  in  the  input  deck,  or 
a  $  control  function  requested  is  not  permitted  under  the  problem 
specification  number. 

IMPRjZiPERLY  PLACED   BCD  CARD.      o'0B  DELETED, 

This  is  printed  when  a  BCD  card  without  a  $  in  column  1  is  placed 
in  an  input  deck  where  a  $  control  card  should  be  placed. 

INACTIVE  PS  Np. 

The  problem  specification  number  on  the  ID  card  has  run  out  of 
hourly  or  monthly  time. 

INCjZSRRECT  tape  N0.  (Z5n  $  BINARY  ^R  $  BREAK 

J0B  N0.  XXXX  DELETED. 

This  m.essage  accompanies  other  error  messages  and  specifies 
the  cujrren';.  job  number. 

J0B  TERMINATED  AND  RESTARTED  BY  0PERAT0R. 

This  message  may  appear  above  the  user's  ID  card.   This  occurs  when 
the  operator  must  for  some  reason  stop  a  job  and  then  restart  it. 

J0B  VIOLATES  CATEG0RY  C0NDITI0NS.   RESUBMIT  J0B  IN  PR0PER  CATE&0RY. 

$  CALCOMP  appears  in  category  other  than  CalComp;,  or  job  without 
$  CALCOMP  appears  in  CalComp  category. 
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N0  C0PIES  PERMISSION  0R  EXCESSIVE  REQUEST. 

The  first  of  this  message  is  self-explanatory.  An  excessive 
request  for  a  problem  specification  niiraber  which  has  copies 
permission  is  a  request  for  more  copies  than  was  approved  on 
the  problem  specification  form^  or,  when  using  a  binary 
permission  card,  it  is  a  request  for  more  than  63  (decimal) 
copies . 

W)Z5  $  C0NTRJZ5l  card.   J0B  DELETED. 

W0  S-8  J0B  CARD.   J0B  DELETED. 

Will  occur  if  the  S-8  card  image  for  this  job  is  missing  from 
the  input  tape . 

REDUNDANCY  RETURN  FRjZ^M  DISK  R0UTINE  AT  L0C  IN  IR5 

SENSl  =  XXXXXXXXXXXX 
SENS2  =  XXXXXXXXXXXX 

This  message  occur  when  some  difficulty  occurs  in  either  reading 

from  or  writing  on  the  disk. 

REMAINING  J0B  TIME  T00  SMALL.   J0B  TERMINATED. 

This  is  printed  when  less  than  six  seconds  are  left  for  the 
current  job  to  run,  thus  likely  making  it  useless  to  start 
the  next  translation  or  execution. 

RETURN  THIS  0UTPUT  T0  CLINT,  RM  I60 

with  either 

REDUNDANCY 

or 

MISPLACED  C0NTR0L  W0RDS 

This  is  printed  along  with  a  dump  of  the  input  buffers  whenever 
a  job  must  be  reloaded  because  of  rediindancies  or  misplaced 
control  words  on  the  input  tape.  This  message  should  never  be 
returned  to  the  user.   In  any  case  that  it  is,  the  user  should 
see  a  consultant. 
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ROUTING  R0U   PERS0NEEL 

RETURN  THIS  PAGE  T0 

CAKDY  WILM0T,  RM  l62 

followed  by  a  disk  redundancy  message,  followed  by  WHILE  UPDATING  PS  Up. 

followed  by  the  cui^rent  job's  problem  specification  number  and  a  dump. 

This  is  printed  when  the  M0NIT0R  is  tmable  to  write  the  problem 
specification  information  table  for  a  given  job  back  onto  the 
disko   This  message  should  never  be  returned  to  the  user.   In  any 
case  that  it  is,  the  user  should  see  a  consultant. 

THE  FIRST  CARD  N0T  READ  WAS 

See  '...  ADDITIONAL  CARDS  WERE  NjZST  READ',  above. 

THIS  JjZ^B  SHOULD  HAVE  BEEN  RELOADED  DUE  T0  ERR0RS  0N  SYSPIT. 

Preceded  by  the  current  job's  ID  card  image,  see  'RETURN  THIS 
j25UTPUT...'  message,  above. 

THIS  PS  EXPIRES  MM/DD/YY 

Followed  by  a  date,  this  message  on  each  job's  accounting  page 
gives  the  expiration  date  of  the  P.S.  Number. 

TJZiTAL  TIME  .G.  REMAINING  PS  TLME. 

The  total  time  punched  on  the  ID  card  is  more  than  the  amount  of 
tirae  remaining  for  this  P.S.  Number. 

UNSUCCESSFUL  EDIT. 
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All. 4  Execution  Coordination  Routines  Messages 

***  AC  pF   TR 

AT  LC  XSCXX 

This  indicates  an  accamulator  overflow  trap.   The  program  tried 

38 
to  compute  a  number  larger  than  10 


***  AC  UF  TR 

AT  LC  XXXXX 

This  indicates  an  accumulator  underflow  trap.   The  program  tried 

-  ^H 
to  compute  a  non-zero  number  less  than  10  "^   in  absolute  value. 

*vr^   ALL  IWFJT  DATA  HAVE  BEEIf  PROCESSED. 
AT  LC  XXXXX 

This  message  appears  when  the  end-of-file  following  the  job  is  read 

and  the  user  has  not  provided  an  end-of-file  return  in  the  call  to 

SYSRIT  or  SYSLIT. 


BAD  C/C  LIST 
AT  LC  XXXXK 

A  call  to  one  of  the  tape  routines  SYSWUB,  SYSRTJB,  SYSiAfUD,  or 

SYSRliD,  or  to  one  of  the  disk  routines  SYSWRD  or  SYSRDD  contains 

a  param.eter  reference  to  location  XXXXXo   This  location  contains  an 

1/0  channel  command  with  one  of  the  following  errors:  the  illegal 

tape  channel  command  IPCD  or  an  illegal  disk  command  has  been  used  5 

the  sum  of  the  effective  add-r-ess  of  the  command  at  location  XXXXX 

and  the  count  has  exceeded  77777o  ("wrap  around"  the  end  of  memory); 

the  channel  command  at  location  XXXXX  has  an  address  which  is 

below  S^'SCRCr  (lOOOOn  at  present).   This  message  can  also  occur 

if  the  nyjnber  of  channel  commands,  exclusive  of  TCH  commands, 

exceeds  3O;  in  this  case,  XXXXX  is  the  locations  at  which  this 

limit  has  been  exceeded. 


****   CARD  ESTIMATE  EXCEEDED 

AT  LC  xx>i\x: 
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DP  EERpR   TR 
AT  LC  XXXXX 

At  location  XXXXX  an  attempt  has  been  made  to  execute  a  double 

precision  instruction  other  than  DST  which  has  an  odd  address. 

EXECUTION  TERMINATED  VIA  SYSERR. 

This  message  occurs  when  a  program  transfers  to  SYSERR  or  the 
operator  terminates  the  job. 

HAJ^GUP 

AT  IC  XXXXX 

A  hangup  has  occurred  during  execution.   The  operator  has 
terminated  the  job  via  SYSEBR . 

H0LD  BUFFER  FULL 

The  user's  program  has  overflowed  the  Low  Core  push-down  list. 
This  usually  occurs  if  trap  exits  are  being  used  for  purposes 
other  than  returns. 

**^*  ILLEGAL  LjZSW  C0RE  FUTJCTIJZ5N  USED 
AT  LC  XXXXX 

This  is  a  general  purpose  message  indicating  the  entrance  into  a 

routine  reserved  for  system  use.   In  general,  these  routines  include 

those  which  move  the  input  or  output  tape  other  than  for  reading  or 

writing,  respectively.   XXXXX  is  the  complement  of  IRU  at  the  time 

the  routine  was  entered.   This  message  will  also  occur  if  the 

argument  for  SYSSTR,  SYSFPT,  or  SYSTTR  is  below  lOOOOg. 


ILLGL  REQST 
AT  LC  XXXXX 


This  message  occurs  if  the  operator  notices  that  the  job  asks  for 
something  illegal  for  the  category,  e.g.  a  $$  SAVEM^UM:  card  on 
EXPRESS. 
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*****  ILLEGAL  UNIT  IN  l/j^  C0NTR0L 
AT  LC  XXXXX 

A.n  illegal  logical  tape  unit  has  been  addressed  by  one  of  the  tape 

routines  called  from  location  XXXXX.   ('ILLEGAL'  here  is  used  in  the 

sense  of  a  non-existent  unit  or  a  protected  unit  such  as  the  input 

or  output  tapes.) 

TWALID  STR-TTR 
AT  LC  XXXXX 

An  STR  or  an  instruction  trapped  by  the  transfer  trap  mode  has 

been  executed  without  a  return  having  been  set. 

jpB  Overtime 

AT  LC  XXXXX 

Time  for  the  job  has  been  exceeded.   This  time  is  the  smallest  time 
of  the  following  times:   l)  execution  time  given  on  ID  card; 

2)  remaining  total  time  left  for  the  job  when  execution  begins; 

3)  the  time  set  by  the  Loader  if  subroutines  are  missing. 

**  L00PING 

AT  LC  XXXXX 

This  message  occuj^s  if  the  operator  intervenes  because  the  program 

seems  to  be  looping. 

***  L^W  C^RE  SYSTEM  DESTROYED 

The  job  changed  some  cell  with  an  address  less  than  SYS^RG  (SYS^RG 
now  is  lOOOOn).   As  a  result,,  the  checksum  of  the  input/output 
supervisor  was  found  to  be  incorrect  when  control  was  returned  to 
the  system  via  SYSTKM^  SYSERE,  SYSTXT^  or  through  operator 
intervention. 

*  LSR  RCD  W0T  END 

This  m_essage  occurs  when  SYSLSR  cannot  find  the  record  it  is 
looking  for.   This  m,ay  be  a  system  error  or  the  user  m.ay  have 
overwritten  the  record  d'oring  a  ping-pong  job. 
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This  message   appears   if  xhere   is   a   checksum  discrepancy  in  a  record 
after   it  lias  been  read  ty  SYSLSE.      If  the   jiCh   is   a  ping-pong  joh, 
the  record  may  have  been  overwritten.     A  bad  tape  may  also   cause 
this  message,    in  which   case  rer'onnine  mieht   solve  the  TDroblem. 


m  LC  xxxxx 

This  indicates   a  m^ultiplier-quotient  register   overflow  trap.      The 
program  tried  to  compute  a  number  larger  than  10       in  absolite  value. 


«**  MQ  UF  TR 

AT  LC  XXXXX 

This   indicates   a  m-ultiplier- quotient  register  ■'underflow  trap.     The 

program  tried  to   compute   a  non-zero  number  smaller  than  10  in 

absolute  value. 


0TERAa'0S  IIfrERvE!WI01  DURING  EXECUTI05r. 

The  operator  terminated  the  j"ob  manually. 

**  0"\?ESTIME 
AT  LC  JDDQa: 

This  message  occurs  if  the  operator  intervenes  because  the  ^ob  has 

r'un  over  the  time  indicated  on  the  ID  card. 

****  PACS:  ESTBIATL  EXCEEDED 
AT  LC  XXXXX 

Sixty  lines  is  considered  one  page.  The  ^ob  has  attempted  to  use 

more  output  lines  than  60  tines  the  page  estimate  on  the  ID  card. 

**  PG-M  ST0P 
AT  LC  XXXXX 

This  message  occ-ors  when  the  machine  stops  and  there  are  no  $$ 

comment  cards  indicating  to  the  operator  what  he  should  do. 

PR0TE'CT  ^/I0IATI05I 
at'  LC  SDDlX 

The  program  has  used  either  an  illegal  instruction  to  refer  to 

lew  c:re  cr  an  instruction  that  violates  memory  protect. 
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EAPE  XX  IS  BAD 
IT  LC  XXXXX 


There  was  a  redundancy  on  the  indicated  -cape. 


EAPE  XX  IS  FULL 
IT  LC  XXXXX 


This  message  is  printed  only  for  a  scratch  tape. 


^^■***   WHAT  VJEBE   Y0U  D^MC- 
AT  LC  XXXXX 


A  'core  constant'  {OCrjkOOhOS'^klr,)   was  executed  at  location  XXXXX. 
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All. 4a   Disk  Execution  Coordination  Routines  Messages 

DISK  ERR^R.   TRACK  XXXXX  MpD  X  jZSPW  X  CHK  X  SENSE  XXXXXXXXXXXX 

Indicates  that  an  irrecoverable  error  has  occurred  during  a  data 

transmission  operation.   The  characters  indicated  by  XXX... XXX 

will  be  octal  digits  which  identify  the  type  of  error^  the  type 

of  operation  being  performed^  and  the  area  of  the  disk  which 

was  being  used.   Any  appearance  of  this  message  should  be  brought 

to  the  immediate  attention  of  the  Consulting  Staffs  in  Room  111b  ERL. 

ILLEGAL  DISK  l.jf)   CALL 

ILLEGAL  DISK  SPECIFICATI0W 

A  parameter  is  illegal  or  permission  for  the  track  requested  does 
not  appear  in  the  internal  problem  specification  information  table. 

IRRECOVERABLE  DISK  ERRiZ^R 

An  unusual  end  signal  has  been  issued  10  times  on  a  disk  select;, 
and  the  user  does  not  have  a  trouble  return  set.   No  other 
messages  can  apply. 

NJZS  RECORD  F^UND  • 

WRITE  CHECK  FAILURE 

Occurs   only  during  a  write   and  write-check  operation. 
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All. 5  Loader  Messages 

CHECKSUM 

As  a  protection  against  input-output  errors  the  checksum 
is  computed  twice.   First,  when  the  binary  card  is  originally 
assembled^  the  result  is  placed  in  the  second  word,   Then;, 
as  each  card  is  read  by  the  Loader,  the  checksujn  is  recomputed 
and  compared  with  the  original  one^  now  in  the  second  word. 
Unless  these  are  identical  the  error  message  CHECKSUM 
is  printed  wit-h  the  binary  card  itr^age  following.   The 
execution  switch  and  the  loading  switch  are  turned  off. 
Loading  does  not  continue,  but  the  remaining  binary  cards 
in  the  Job  are  scanned  for  errors.   If  the  user  wishes  to 
punch  or  change  a  binary  card  and  does  not  have  the  correct 
checksum  available,  he  can  provide  a  signal  to  the  Loader  to 
ignore  the  checksum  test  by  punching  row  0,  column  1,  or  by 
leaving  the  checks'.,jn  word  blank. 

DISK  LIBRAB.Y  LEADER  CAJOT0T  L^^AD  MpRE  THAW  60  LIBRARY  RpUTIKES--SEE   C0NSULTAJ\rT 

DISK  LIBRARY  RECpRD  TRACK  GANN0T  BE  RKAJ)- SENSE  W^RD   1  XXXXXXXJQQQCX 
LIBRARY  WILL  BE  READ  FR0M  TAIE 

An  error  Las   occurred  rLn  reading  a  library  program  off 

the  disk.   The  library  programs  will  be  taken  from  the  tape. 

EXECUTI0W  TAPE  IS  EITHER  BAD  ^R  THERE  IS  AN  ILLEGAL  BCD  CARD. 

This  message  occurs  if  there  is  a  tape  redundancy  or  if  a 
BCD  card  image  is  read. 

FIRST  CARD  N0T  A  FR0GRAM  CAR_D 

Each  relocatable  progran.  i^MAIW  or  subprogram)  requires  a 
Program  Card  which  contains  information  for  the  Loader 
to  use  m  relocation.   This  message  indicates  that  the 
first  Program  Card  in  the  core  load  is  missing.   Control 
is  retui'ned  t.o  the  syst.em. 


Date: 

10/1/66 

Section: 

All.  5 

Page: 

1 

Change: 

2 

Porthos 

Manual 

ILLEGAL  BCD  CARD 

The  Loader  is  ordinarily  only  concerned  with  binary  card  images. 
The  only  BCD  card  it  should  every  correctly  encounter  is  a 
$  DATA  card  and  then  only  if  a  $  BINARY  card  has  preceded 
it.   If  any  other  BCD  card  is  read  by  the  Loader,  it  prints  out 
the  above  message,  the  execution  switch  is  turned  off,  and  the 
binary  image  of  the  BCD  card  in  error  is  printed.   This  error 
usually  occurs  when  a  BCD  card  is  accidentally  included  within 
a  binary  deck. 

ILLEGAL  BINARY  TRANSITION  CARD 

A  binary  transition  card  has  been  incorrectly  placed  before 
the  beginning  of  a  core  load,  or  a  Ping-Pong  Tape  or  Tape  3  or 
k   is  requested. 

ILLEGAL  ENTRY  NAME  XXXXXX 

This  message  occurs  if  there  is  not  a  1  in  any  of  the  first 
three  bits  of  a  subroutine  name;  e.g.,  if  the  first  character 
is  a  numeric  digit. 

ILLEGAL  L0ADING  ADDRESS 

If  a  relocatable  program  contains  a  loading  address  that  would 

cause  loading  into  Low  Core  or  above  the  Program  Break,  this 

message  occurs.   This  can  be  caused  by  a  misplaced  relocatable 

binary  card,  a  misplaced  program  card,  or  a  program  which 

is  too  large  and  has  wrapped  itself  around  the  core  (modulo  lOOOOOn) 

in  such  a  way  that  the  Program  Break  appears  to  be  below  the 

address  of  the  card  being  loaded. 

If  an  absolute  program  tries  to  overwrite  the  Loader  or  Low 

Core,  loading  is  terminated  and  this  message  is  printed. 
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ILLEGAL  USE  OF  FULL  C0RE  LEADING 

A  single  program  segment  which  "will  not  fit  between  SYSpRG 
(currently  lOOCOn )  and  the  Subroutines  Present  Table 
(73OOO0)  will  inmiediately  stop  the  loading  process  and  print 
out  this  message.   This  program  segment  may  be  the  main 
program,  a  subprogram.,,  or  the  entire  library  subroutine  area 
which  is  treated  as  a  single  segment «   Proper  coding  can  always 
further  split  a  main  program  or  subroutine.   If  the  library 
segment  is  too  long,  the  necessary  sjnribolic  decks  can  be 
obtained  from  the  Librarian  to  shorten  this  segm.ent.   These 
must  be  included  with  the  user's  program.   See  a  consultant. 

LIBRARY  CAIM0T  BE  L0ADED  PR0BABLY  DUE  T0  SCSME  INCONSISTENCY  IN  EI\ITRY  NAMES 
This  message  occurs  when  a  user  supplies  a  routine  with  an 
entry  name  the  same  as  one  entry  name  in  a  system  subroutine, 
and  he  then  calls  one  of  the  other  entry  names  of  that  system 
subroutine.   This  second  entry  name  is  not  an  entry  name  of 
the  supplied  routine. 

LIBRARY  CHECKSUM  ERR0R 

A  checksum  error  has  occured  in  reading  a  library  program 

ft-om  the  disk  or  tape.   Since  this  would  occur  only  if  there  were 

a  ms^chine  error,  resubmitting  the  Job  should  eliminate  this. 

XXXXX   L0CS.  CAN  BE  SAFELY  USED  IN  EXPAimiNG  PR0G.  [pCTAh) 

This  appears  after  the  MAP.   It  informs  the  user  of  how  manj'' 
locations  he  has  not  yet  used  with  this  prograiiio 


MAP 


This  gives  the  first  location  of  all  routines  in  this  program. 
All  low  core  routines  have  00000  after  themo   All  system, 
library  routines  are  denoted  by  an  asterisk  following  the 
first  location. 


Date: 

10/1/66 

Section: 

All.  5 

Page: 

3 

Change : 

2 

Porthos 

Manual 

MAP  (SPLIT  C0RE  L0AD) 

This  is  the  same  as  MA.P  except  that  this  program  was  loaded 
using  the  split  core  feature  of  the  Loader. 

N^  MAIN  PRjZSGRAM 

This  is  a  fatal  error.   Control  is  returned  to  the  system. 

PAET TALLY  LEADED  REC0RD 

This  message  is  printed  out  when  a  transition  card  asks  for  a 
record  to  be  partially  loaded  on  an  indicated  tape. 

PROGRAM  AM)  ERAS.  jZiVERLAP  BY  XXXXX  L0CS. 

A  ■PROGRAM  AJTO  ERASABLE' overlap  occurs  when  the  user's  program 
plus  the  library  programs  it  needs  form  too  large  a  segment  to 
fit  between  the  initial  address  (lOOOOn)  and  the  lowest  address 
of  the  reserved  ERASABLE  or  C0MMjZSn.   Steps  to  take  to  eliminate 
this  problem  are: 

1.  Reduce  the  size  of  ERASABLE  or  C0MM0N; 

2.  Reduce  the  size  of  DIMENSION  statements; 

3.  Reduce  the  size  of  PROGRAM  C0MMJZSn  if  it  is  used;  or 
h.      Use  Ping-Pong. 

PR0GRAM  0N  TAPE  XXXXX,  ID  =  XXXXX  (jZJCTAL) 

This  message  identifies  which  core  loads  are  on  which  tapes 
in  a  Ping-Pong  job. 

SUBROUTINE  XXXXXX  APPEARS  M0RE  THAN  jZiNCE.   FIRST  0NE  L0ADED  WILL  BE  USED 

The  name  of  the  second  subroutine  does  not  appear  on  the  MAP 
even  though  this  subroutine  occupies  space  in  core. 
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SUBROUTINES  W0T  AVAILABLE  FR0M  LIBRARY 
XXXXXX       XXXXXX 

EXECUTION  WILL  PROCEED  FOR  15  SEC.  (ZSR  UTJTIL  A  MISSING  SUBROUTINE  IS  CALLED 
A  user  may  have  a  program  which  calls  subroutines  not  yet 
written.  A  user  may  have  incorrectly  coded  a  segment  such  that 
the  translator  expects  a  subroutine  which  is  not  intended  to 
be  included.   A  user  may  call  a  subroutine  and  not  include  the 
subroutine  in  his  deck  because  it  is  assumed  to  be  on  the 
subroutine  library  tape.   A  user  may  try  to  substitute  a  subroutine 
of  his  own  for  a  library  routine  of  the  same  name  without  making 
certain  that  his  substitute  subroutine  has  all  the  necessary 
entries  that  are  needed  by  any  other  library  routines  he  has  called. 
Since  it  is  often  possible  to  gain  information  from  a  run  before 
a  subroutine  (in  this  case,  the  missing  one)  is  called,  this 
message  is  considered  to  be  non-fatal  and  execution  continues 
until  the  subroutine  is  called  or  until  15  seconds  have  elapsed, 
whichever  situation  occurs  first.   In  any  case,  the  subroutine 
0NTRAC "0 fTRAC  is  called  into  core  and  utilized,  requiring 
additional  core  storage  of  130n+'+N  where  N  is  equivalent  to  the 
number  of  subroutines  called  in  the  program. 

2  MAIN  PR0C-RAMS 

This  is  a  fatal  error.   Control  is  returned  to  the  system. 

W0RD  C0UWT 

A  word  count  greater  than  (32o)  on  any  binary  card  will 
cause  this  message  to  appear,  followed  by  the  binary  card 
image.   The  word  count  appears  in  the  decrement  of  the 
first  word  (exclusive  of  the  7-9  punches).   This  is  often 
caused  by  an  improperly  reproduced  binary  card.   Loading 
does  not  continue  but  scanning  for  errors  does. 
If  the  card  printed  out  is  an  absolute  transfer  card, 
it  is  with  a  relocatable  program. 
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All. 6  SCATRE  Messages 

MULTIPLY-DEFINED  SYMBOLS 

(followed  by  a  list  of  multiply -defined  symbols) 

P0SSIBLE  MACHINE  ERR0R  --  ASSEMBLY  DISCONTINUED... 

XXXXX  IS  THE  FIRST  L0CATI^N  Ni^T  USED  BY  THIS  PROGRAM 

*•***•)«-  SYMBOL  REFERENCES  INCOMPLETE  -  REFERENCE  TABLE  OVERFLOWED 

**^*   THE  FOLLOWING  ERROR  TERMINATED  THIS  ASSEMBLY  a 

****   LAST  CARD  ...   a 

(where  a  is  one  of  the  messages  taken  from  the  list  below  and  cc 
is  the  last  card  read  by  SCATRE) 
COMPILE  TABLE  EXCEEDED 

CREATED  SYMBOLS  EXCEEDED  (>  9999  created  symbols) 
ENTRY  TABLE  EXCEEDED  (>  50^  distinct  entry  names) 
LITERAL  TABLE  EXCEEDED  (>  200   distinct  literals) 
MACRO  TABLE  EXCEEDED 
MISSING  END  CARD 

In  addition  to  occurring  in  the  absence  of  a  terminal 
END  card,  this  message  is  also  used  to  indicate  an 
error  in  the  order  of  card  images  in  a  SCATRE  input 
deck.   Examples  of  the  latter  would  be  a  card  image 
with  a  $  in  column  1,  the  appearance  of  a  BCD  (binary) 
image  when  a  binary  (BCD)  image  is  expected,  or  the 
occurrence  of  an  EOF  when  SCATRE  expects  another  BCD 
or  binary  image  to  appear  on  SYSPIT. 

QPERATION  TABLE  OVERFLOW 

There  is  not  room  in  the  operation  table  to  enter  the 
operation  name  which  has  been  defined  via  an  0^^^  O-^^^'-^^ 
or  MACRO  definition. 
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SYMBOL  TABLE  CHECKSUM  (checksum  on  binary  symbol  table  card  in  error) 

SYMB0L  TABLE  EXCEEDED  (>  3^99-, q  symbols) 

TRANSFER  VECT0R  0VERFL0W  (>  50   distinct  transfer  vector  entries) 

UWDEFIEED  SYMBQLS 

(followed  by  a  list  of  undefined  symbols) 

*****   FATAL  ERR0RS  ****a 
*   N0N-FATAL  ERR0RS  ****a 

(where  o:  is  a  decimal  number  equal  to  the  number  of  lines  of  the 

listing  on  which  error  flags  occur) 

In  addition  to  the  above  error  messages^  there  occur  error  flags, 
single  alphabetic  characters  which  are  printed  in  the  left  hand  margin  of  the 
assembly  listing.  These  flags  are  fully  described  in  the  SCATRE  manual 
(Library  routine  L1-U0I-SCRE-19-BX,  section  8) . 
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All.  7  F0RIEAN  IBM  Messages 

The  FORTRAN  IBM  messages  are  self-explanatory^  or  an  explanation 
appears  in  the  FjZSRTRAIT  II  Programming  Manual  (IBM  Form  No.  C28-605^). 
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All. 8     ALGjZiL  Messages 

The  ALG0L  messages  are  self-explanatory,  or  an  explanation  appears 
in  the  "User's  Manual  for  the  Alcor -University  of  Illinois  ALG0L-6O 
Translator." 
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All. 9  MAD  Messages 

The  MAD  messages  are  self-explanatory,  or  an  explanation  appears 
in  "A  User's  Reference  Manual  for  the  Michigan  Algorithm  Decoder." 
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A  VECTOR  VALUES  STATEMENT  ATTEMPTS  TO  PRESET  COMMON  WITH  RELOCATABLE 
INFORMATION  OR  STATEMENT  LABELS  ASSIGNED  TO  COMMON 

MAD  ERROR 

IDENTICAL  STATEMENT  LABELS 

INVALID  MODE  FOR  SOME  OPERAND  IN  PRECEDING  STATEMENT 

AVAILABLE  STORAGE  EXCEEDED  -  PROGRAM  OVERLAPS  RELOCATABLE 

A  SUBSCRIPTED  VARIABLE  HAS  NOT  BEEN  DIMENSIONED 

PARAMETER  USE  TABLE  EXCEEDED 

ADDITIONAL  TRANSFER  TABLE  EXCEEDED 

FLOATING  ADDRESS  TABLE  EXCEEDED 

ADDITIONAL  ABCON  TABLE  EXCEEDED 

PROGRAM  ENTRY  TABLE  EXCEEDED 

STORAGE  DICTIONARY  EXCEEDED. 
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.11.10  Messages  Arising  From  The  l/o  With  Conversion  Routines 
****'READ  DATA'  SUBROUTINE  ERR0R  RETURN -- 
if*** 'READ  DATA'  SUBR0UTINE  ERRjZiR  RETURN  - -ERR0R  IN  THIS  CARD 

These  error  messages  refer  to  l/o  errors.   (see  section  6.3-6.3.) 
The  subroutine  which  executes  a  READ  DATA  statement  in  a  MAD 
program  has  detected  an  error.   If  the  first  message  is  printed,  one  of  these 
error  messages  follows; 

****0DD  $  C0UNT  IN  DATA  SET. 
****BINARY  CARD  IN  DATA  SET 
If  the  second  message  is  printed,  the  card  being  processed  when  the  error 
was  detected  is  printed  on  the  next  line.   One  of  the  following  errors  has 
been  detected:  . 

****DIMENSI0NING  0R  SUBSCRIPTING  ERR0R 
****ILLEGAL  CHARACTER  IN  COLUMN  NN,   C       -   - 

where  C  is  the  illegal  character 
****INVALID  M0DE  F0R  S0ME  NUMBER  0R  ILLEGAL  CHARACTER  IN  NUMBER 
****VVVVW  IS  N0T  THE  NAME  0F  A  VARIABLE  IN  THE  CALLING  PR0GRAM 
where  VWYW  is  the  variable  name  in  the  last  input 
field  processed 
****0VERFL0W,  S0ME  NUMBER  T00  LARGE  (0R  T00  SMALL). 
****' PRINT  RESULTS'  SUBR0UTINE  ERR0R  RETURN --ILLEGALLY  F0RMED 
1/0  LIST 

This  error  is  an  l/o  error.   See  section  6. 3.6, 3- 
A  variable  name  appearing  in  the  list  of  a  PRINT 
RESULTS  statement  in  a  MAD  program  does  not  appear  in  the 
symbol  table  of  the  program  or  has  a  mode  other  than  floating 
point,  integer,  or  Boolean. 
■^***ILLEGAL  BCD  TAPE  NUMBER 

This  is  an  l/o  error  (section  6. 3-6. 3-) 

The  above  message  is  printed  when  either  of  the  following  errors 
occurs :       • 

(l)   a  MAD  READ  BCD  TAPE  statement  or  a  FORTRAN  READ  INPUT  TAPE 
statement  or  a  calling  sequence  to  SCATRE  subroutine  .TAPRD 


specifies  a  logical  tape  number  which  is 


not     -h.hp     niiTnhg-p    nf    t.hp 
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system  input  tape  or  a  utility  tape. 

(2)   a  MD  WRITE  BCD  TAPE  statement  or  a  FORTRAN  WRITE  /lUTPUT 

TAPE  statement  or  a  calling  sequence  to  SCATRE  subroutine  .TAPWR 

specifies  a  logical  tape  number  which  is  not  the  number  of  the 

system  print  output  tape,  the  system  punch  output  tape,  or  a 

utility  tape. 

****LIST  P0R  PUNCHING  BINARY  CARD  T00  L0NG 

This  is  an  l/o  error  (section  6.3.6.3.). 

The  list  of  a  WRITE  BINARY  TAPE  5  or  WRITE  BINARY  TAPE  6 
statement  in  a  MAD  program,  or  the  list  of  a  WRITE  TAPE  5  or 
WRITE  TAPE  6  statement  in  a  FORTRAN  program,  directs  the  sub- 
routine executing  the  statement  to  punch  more  than  27  words 
in  a  binary  card  image  to  be  written  on  the  system  output  tape. 
****LIST  P0R  READING  BINARY  CARD  T(2!0  L0NG 

This  is  an  l/O  error  (section  6. 3.6.3. )• 

The  list  of  a  READ  BINARY  TAPE  7  statement  in  a  MAD  program 
or  a  READ  TAPE  7  statement  in  a  FORTRAN  program  directs  the 
subroutine  executing  the  statement  to  read  more  than  27  words 
from  a  binary  card  image  on  the  system  input  tape. 
****ILLEGAL  BINARY  TAPE  NUMBER 

This  is  an  l/O  error  (section  6.3.6.3. )• 

This  message  is  printed  when  either  of  the  following  errors 
occurs : 

(1)  a  MAD  READ  BINARY  TAPE  statement  or  a  FORTRAN  READ  TAPE 
statement  refers  to  a  tape  which  is  not  the  system  input  tape  or 
a  utility  tape . 

(2)  a  MAD  WRITE  BINARY  TAPE  statement  or  a  FORTRAN  WRITE  TAPE 
statement  refers  to  a  tape  which  is  not  the  system  print  output 
tape,  the  system  punch  output  tape,  or  a  utility  tape. 

1/0  R0UTINE  CALLED  FR0M  L0CATr0N  XXXXX 

This  message  is  printed  immediately  following  the  error  message 
describing  an  l/o  error.   XXXXX  is  the  locJation  of  the  TSX  YYYYYY,!^-  by 
which  l/o  subroutine  YYYYYY  was  entered.   For  more  discussion  of  the  pro- 


r^pgging  nf  J  / C) 
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;rrors,  see  section  6.3.6.3. 


****-BAD  BIWAEY  RECji 

This  error  condition  is  an  l/O  error  (section  6,3,6.3,). 

A  BACKSPACE  statement  in  a  FORTRAN  program  ordered  the 
computer  to  backspace  the  specified  tape  one  logical  record. 
To  backspace  over  a  logical  record,  it  is  necessary  to  read 
the  last  physical  record  of  that  logical  record.   The  above 
error  message  is  printed  if  this  record  cannot  be  read  suc- 
cessfully. 
**^*BINARY  CARD  IN  BCD  DATA 

This  error  condition  is  an  l/O  error  (section  6.3.6,3.). 

The  next  card  image  on  the  system  input  tape  is  a  binary 
card,  but  an  l/o  with  conversion  subroutine,  .READ  or  .L00K, 
has  been  entered  to  transmit  a  BCD  record  to  storage. 

This  error  condition  may  occur  during  execution  of: 

(1)  .READ  or  .L00K 

(2)  the  FORTRAN  statements  READ  or  READ  INPUT  TAPE  7 

(3)  the  MAD  statements  READ  F0RMAT  or  READ  BCD  TAPE  7, 
****ILLEGAL  BLOCK  PARAMETER  IN  BINARY  TAPE  l/0  LIST 

This  error  condition  is  an  l/O  error  (section  6.3.6,3.). 

The  I/O  list  of  a  MAD  READ  BINARY  TAPE  statement  or 

WRITE  BINARY  TAPE  statement  contains  a  block  element 

V  (s^,   s^,...,s  )  ...  V  (r^,  r^,  ....  r  )  such  that  the 
1^   2      n  12        n 

linear  subscript  corresponding  to  V  (r  ,  r   ,...^)   is  greater 
than  the  linear  subscript  corresponding  to  V  (s  ,  s    .,.,  s  ) 
**^^BINARY  TAPE  l/0  LIST  T00  L0NG 

This  error  condition  is  an  l/O  error. 

The  I/O  list  of  a  MAD  READ  BINARY  TAPE  statement  or  WRITE 
BINARY  TAPE  statement  contains  more  than  200  elements, 
**^f*BAD  TAPE  N0.,  N0N-DATA  TAPE  ROUTINE 

This  is  an  l/O  error  (section  6.3.6,3.)- 

One  of  the  FORTRAN  statements  BACKSPACE,  END  FILE,  or 

REWIND,  or  one  of  the  MAD  statements  REWIND  TAPE,  END  0F  FILE 

TAPE,  BACKSPACE  REC0RD  0F  TAPE,  or  BACKSPACE  FILE  0F  TAPE, 

refers  to  a  tape  number  that  is  not  the  logical  number  of  a 
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utility  tape. 


****BCD  CiffiD  IN  BINARY  DATA 

This  is  an  l/O  error  (section  6.3.Q.3')' 

The  next  card  image  on  the  system  input  tape  is  a  BCD  card, 
but  a  READ  BINARY  TAPE  7  statement  in  a  MAD  program  or  a  READ 
TAPE  7  statement  in  a  FORTRAN  program  has  directed  the  computer 
to  transmit  a  binary  card  image  from  the  system  input  tape  to 
storage . 
^•)f**BAD  F0RMAT 

This  error  is  detected  during  input/output  with  conversion. 
Refer  to  6.3,6.  3,^4-. 6f  the  PORTHOS  manual,  "Format/Conversion 
Errors",  for  a  discussion  of  this  error  condition. 
****F0RMAT  REQUIRES  0VER  NNE  COLUMNS 

This  error  is  detected  during  input/output  with  conversion. 
Refer  to  6, 3.6. 3.^)-.  of  the  PORTHOS  manual,  "Format/Conversion 
Errors",  for  a  discussion  of  this  error  condition. 
****ILLEGAL  CHARACTER  IN  INPUT  REC0RD 

This  error  is  detected  during  input  with  conversion.   Refer 
to6.3.6.3.1+.  of  the  PORTHOS  manual,  "Format/Conversion  Errors", 
for  a  discussion  of  this  error  condition. 
****NUMBER  EXCEEDS  SPECIEIED  FIELD  WIDTH.   NUMBER  IS..... 

This  error  is  detected  during  output  with  conversion.   Refer 
to  6.3,6.  3.^4-.  of  the  PORTHOS  manual,  "Format/Conversion  Errors", 
for  a  discussion  of  this  error  condition. 
**^t*NUMBER  N0T  IN  MACHINE  RANGE 

This  error  is  detected  during  input  with  conversion.   Refer 
to  6.3,6.3.)+.  of  the  PORTHOS  manual,  "Formfet/Conversion  Errors", 
for  a  discussion  of  this  error  condition. 
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All. 11  System  Library  Messages 

Most  of  the  System  Library  Messages  are  self-explanatory,  or  an 
explanation  appears  in  the  individual  subroutine  write-up. 

The  following  message  is  sometimes  confusing  to  the  user: 

DP  ADDRESS  EBRpR 

This  message  occurs  when  a  double  precision  number,  which 
should  start  in  an  even  location,  has  started  in  an  odd 
location. 
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All. 12  Messages  Arising  from  SSUPAC 


**^   SSUPAC  UNABLE  TO  READ  DISK 


Disk  access  inoperative  at  time  of  this  attempt.   Resubmit  job. 
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All. 13  CalComp  Messages 

THIS  J0B  USED  XXXXX  INCHES  pF  PLOTTER  PAPER 

This  message  appears  on  the  printed  output  indicating  how  many 
inches  were  plotted  on  CalComp. 

***   PLOTTER  BHUTTOS  APPARENTLY  DESTROYED. 
DUMP  F0LL0WS  ...  (SEE  A  CONSULTANT) 

L0ST  C0NTR0L 

This  appears  on  the  plotter  output  if  the  plotter  bounds  at 
SYS^RG  are  destroyed. 
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All.lU   HAV0C  Messages 

The  HAV0C  messages  are  divided  into  three  groups. 
Messages  generated  from  processing  input/output  tapes  for  the  709^: 

A  page  of  asterisks  occurs  to  separate  the  output  of  one  job 
from  that  of  the  next  job. 

XXXX  CARDS  ***    ...  ***  YYY  ZZZZ 

If  the  user  has  punched  output^  the  page  of  asterisks  will 
have  this  format,  where  XXXX  is  the  number  of  cards  punched, 
YYY  is  the  file  number  on  the  input  tape,  and  ZZZZ  is  the 
job  number. 

END  0F  SPECIAL  F0RMS 

This  message  occurs  at  the  end  of  a  job  requiring  special 
forms . 

;  SPECIAL  PRINTER  F0RMS 

This  message  occurs  when  special  printer  forms  have  been 
requested.   It  is  a  message  to  the  lUOl  operator  to  change 
to  the  specified  forms.         - 


SPECIAL  PUNCH  F0RMS 

This  message  occurs  when  special  cards  have  been  requested. 

It  is  a  message  to  the  lUol  operator  to  change  to  the  specified 

cards . 

SPLIT  0UTPUT  TAPE 

The  output  for  this  job  was  started  on  one  tape  and  completed  on 
another.   This  does  not  affect  the  running  or  the  printing  of 
the  job. 
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Messages  generated  by  List/Reproduce: 

=f  4  i  4  4  4  H  4  4  n  U  4  4  4  4  U  4  4  +  H  4  H  4  + 

A  page  of  record  marks  (4=)  occurs  to  separate  the  output  of  one 
job  from  that  of  the  next  job. 

XXXX  CARDS   :j:  4  4  ••"  4  4  4  ZZZZ  YYY 

If  the  user  has  punched  output ^  the  page  of  record  marks  will 
have  this  format,  where  XXXX  is  the  number  of  cards  punched, 
YYY  is  the  file  number  on  the  input  tape,  and  ZZZZ  is  the 
job  number. 

li+Ol  PPERA.T0R  INTERVENTION 

The  lUoi  operator  deleted  the  job. 

C)?5UNTER  0VERFL0W 

The  counter  prescribed  by  the  user  has  overflowed.  A  smaller 
increment  or  a  larger  field  for  the  counter  should  be  used. 

FIELD   IS  T0jZ^  BIG 

The  fields  requested  by  the  user  for  the  new  card  total  more 
than  the  80  columns  available  on  a  BCD  card. 

HAV0C  RGCP  WILL  N0T  PUNCH  0R  PRINT  BINARY  DATA 

INVALID  CHARACTER  IN  XX 

An  illegal  non-numeric  character  has  appeared  on  the  ID  card  or 
on  an  RGCP  control  card.   The  2-character  parameter  containing 
the  illegal  character  is  printed  in  place  of  XX  in  the  message. 

J0B  DELETED 

This  will  be  found  as  part  of  other  messages. 
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Np   C0NTR0L  CARD 

This  message  indicates  one  of  two  conditions:   (l)  there  was  no 
"T"  control  card  (end  of  control  cards);  (2)  no  RGCP  control  cards 
were  encountered  at  all. 

N0  ID  CARD  -  - 

HAV0C  recognizes  the  ID  card  by  testing  column  1.   This  message 
means  that  colijmn  1  contains  some  character  other  than  1,  2,    3>    or  k, 

T00  BIG  XX 

An  RGCP  control  card  parameter  is  greater  than  80  columns.   The 
illegal  parameter  is  printed  in  place  of  XX. 

T0jz5  mm  c^wTRjziL  cards 

The  table  which  holds  the  parameters  given  by  the  control  cards 
has  overflowed.   The  number  of  control  cards  or  number  of  fields 
should  be  reduced  for  the  next  run. 

UNEQUAL  FIELDS  XXXXXXXX 

This  message  indicates  that  an  error  was  m_ade  by  the  user  in 
allocation  of  fields.   The  fields  indicated  in  the  first  U  X's 
are  not  equivalent  in  size  to  the  fields  listed  in  the  last 


Messages  common  to  both: 

L0ST  C0NTR)ZSL 

Whenever  this  message  appears  on  your  output;,  please  inform 
the  consultants. 

l^p   PUNCHED  0UTPUr 

This  appears  at  the  bottom  of  the  page  of  asterisks  or  record  marks 
if  there  was  no  card  output. 
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PROCESSED  BY  HAVjZ5C  pF   MM/DD/YY 

This  appears  at  the  beginning  of  the  output  on  every  job.  The 
date  specifies  the  version  of  EAVpC  used  to  process  the  output 
of  the  job. 

SELECT  X  BAD 

One  of  the  tapes  being  used  on  the  1^01  was  bad. 

OTKN^WW  TRANSFER 

This  message  should  not  be  returned  to  the  user.   If  it  is,  he  may 
ignore  it,  as  it  has  no  effect  on  his  output. 
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A11.16  FASTRAN  Messages 


The  FASTRAW  messages  are  self-explanatory. 
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A11.18  SNpBpL   Messages 

II  The  SN^B0L  messages  are  self-explanatory  or  an  explanation  appears 

in  the  current  SW)Z!iB0L  manual  ("User's  Manual  for  the  SNpBpL   String 
Manipulat  ion  Language " ) . 
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All. 19  UIEDIT  Messages 

Many  of  the  UIEDIT  messages  are  either  self-explanatory  or  are 
explained  in  the  writeup.   The  ones  which  may  need  explanation  are  listed 
below. 

The  following  error  m.essages  are  all  preceded  by  the  statement 
FATAL  ERR0R  EXIT  -- 

BAD  COMMAND  LIST 

The  last  l/0  command  in  the  standard  system  loading  block  must 
have  a  prefix  of  3^  ^}    or  5« 

F+R  CM'T   =  ZER0 

Any  command  that  requires  files  (F)  and  records  (r)  as  parameters 
must  not  have  F+R  =  0. 

FWA  .G.  LWA  IN  LBS 

One  of  the  blocks  in  the  Loading  Block  Specification  (LBS)  card  has 
the  First  Word  Address  (FWA)  greater  than  the  Last  Word  Address  (LWA). 
The  permissible  condition  is  FWA  <  LWA, 

ILLEGAL  CARD 

This  message  occurs  when  there  is  a  relocatable  card  in  the  deck, 
the  word  count  on  the  binary  card  is  too  large  (must  be  <  2^     ) ,    or 
there  is  an  illegal  absolute  card. 

ILLEGAL  NAME 

BCD  parameter  does  not  start  with  an  alphabetic  character. 

ILLEGAL  PARAMETER 

This  occurs  when  there  are  too  many  (few)  characters,  the  second 
parameter  is  non-zero  on  a  PATCH  command,  or  a  parameter  >  32,T6'~(      - 
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ILLEGAL  REC0RD 

CPYSR  will  not  allow  copying  of  a  record  with  an  ID  of  ITJ^Tn. 

Nj25  BL0CK  AVAILABLE 

The  loading  address  of  an  absolute  binary  card  lies  outside  the 
range  of  any  of  the  blocks  indicated  on  the  Loading  Block 
Specification  card. 

PARAMETER  C01INT 

There  are  too  many  (few)  parameters. 

REC0RD  T0P   LARGE 

A  record  exceeds  the  length  of  UIEDIT's  buffer  (i.e.^  the 

record  >  60OOO0   in  tape   edit  mode   or  >  Ui+320o   in  disk  edit  mode). 

T^^  MAm  BLJZSCKS 

The  Loading  Block  Specification  vector  allows  up  to  ten  blocks. 

TYPE  A  NjZ5T  FIRST 

The  Type  A  Loading  Block  Specification  (LBS)  card  must  be  the 
first  card  in  a  binary  deck. 
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A12,   HAV0C  List/Reproduce 

Introduction 

HAV0C;,  the  lUoi  system^  may  be  used  for  listing  and  reproducing  cards, 
These  jobs  are  batched  as  a  separate  category  called  list/reproduce. 

The  first  page  of  the  printed  output  will  be  an  identification  page 
containing  the  ID  card  image,  a  print-out  of  RGCP  control  cards  (if  any),  and 
error  messages  (if  any).   The  last  page  will  be  a  separator  page,  covered 
with  the  character  f .  The  punched  output  will  include  an  ID  card  and  a 
separator  card  for  each  copy  requested.   The  last  card  will  be  a  card  with  a 
different  corner  cut . 

HAV0C  List/Reproduce  ID  Card 

The  first  card  of  every  list/reproduce  job  must  be  an  ID  card, 
punched  in  the  format  shown  below.  The  standard  DCS  ID  card  form  with  a 
green  stripe  must  be  used.  The  card  must  be  interpreted.  The  format  of 
the  card  is  as  follows: 

Column  of  Of  the  ID  card  describes  the  type  of  job: 

1  =  8O-8O  listing  of  binary  and/ or  BCD  cards  (no  control  cards) . 

2  =  8O-8O  reproduction  of  binary  and/ or  BCD  cards  (no  control  cards) . 

3  =  8O-8O  listing  and  reproduction  of  binary  and/or  BCD  cards 

(no  control  cards) . 

h  =   Reproduction,  gang- punching,  printing,  and  sequencing  of  BCD 
cards.   (Control  cards  are  needed,  as  described  below.) 

(a  blank  or  any  character  other  than  1,  2,  3.'  or  h   is  illegal  in  col'jmn  lo) 

The  remainder  of  the  ID  card  is  as  follows : 

Col  2-6        Problem  Specification  Number 

Col  7-2U       User's  Name 

Col  27-55      The  type  of  cards  which  the  user  prefers  if  reproduction  is 
involved.   If  the  user  has  no  preference,  ANY  should  be 
punched  in  this  field.   If  the  type  of  card  which  was 
requested  is  not  available,  the  routing  room  personnel  will 
attempt  to  call  the  user  if  his  phone  number  appears  on  the 
ID  card.   The  job  will  not  be  run. 

Col  58-63      Department  Code 

Col  6U-65      Number  of  copies  to  be  listed.  The  maximum  number  of  copies 
is  99'  Non-numeric  characters  are  illegal.  This  should  be 
a  non-zero  number  only  when  column  1  contains  a  1,  3?  or  U. 


Date: 

10/1/66 

Section: 

A- 12. 

Page: 

1 

Change: 

1 

Forth QS 

Manual 

Col  67         Carriage  spacing: 

a  blank  will  result  in  s ingle  spacing  of  listed  output; 

a  0  will  result  in  double  spacing  of  listed  output? 

any  other  character  will  give  unpredictable  results. 

Col  69-70  Number  of  copies  to  be  punched.  The  maximum  number  of  copies 
is  99"  Non-numeric  characters  are  illegal.  This  should  be  a 
non-zero  number  only  when  column  1  contains  a  2^  3^  or  U. 

All  other  coliimns  should  be  left  blank. 
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HAVOC  RG-CP  Control  Cards 

The  HAV^C  RGCP  routine  allows  a  user  to  relocate  columns  of  data 
and/or  gang-punch  and/ or  sequence  (count)  BCD  card  imageso   Control  cardS;, 
in  the  format  described  below,  inform  the  HAV0C  RGCP  routine  what  types  of 
operation  are  desired.   The  numbers  of  copies  printed  and  punched  are 
determined  by  the  copies  control  fields  on  the  ID  card.   (However,  at 
least  one  copy  will  always  be  printed  and  punched. ) 

Column  1  of  each  control  card  describes  the  operation  to  be 
performed,  as  follows  s 

R  =  reproduction 

G  =  gang-punching 

C  =  sequencing  (counting) 

T  =  end  of  control  cards 
A  T  card  must  always  appear  as  the  last  control  card. 

A  two-digit  number  must  be  used  to  designate  a  colijmn  of  a 
card. 

Reproduction 

Column  1  contains  an  P.   There  are  five  fields  with  identical 
formats:   col'amns  2-9,  lO-iy,  l8=25,  26-33;,  3*4-^+1.   Columns  U2-8O  are 
unused.   The  fields  must  be  used  from  the  leftmost  field  to  the  rightmost 
field.  A  description  of  the  first  field  follows.   The  same  format  should 
be  followed  for  the  other  fields. 

Reproduce  the  columns  indicated  in  2-5  into  the  coluitins  indicated 
in  6-9»   Col'omns  2-3  and  h-5   of  the  control  card  state  the  first  and  last 
col"umrLS  of  the  information  to  be  reproduced  respectively.   Columns  6-7 
and  8-9  state  the  first  and  last  coli.:mins  respectively  of  the  new  card 
into  which  the  information  is  to  te  reproduced. 

C-ang-Ptinching 

Column  1  contains  a  G.   There  are  five  identical  fields  with, 
identical  formats:   Columns  2-9,  10-1?,  l8»-25:;  26-33,  3^-^l»   Columns  U2-8O 
are  used  for  data  to  be  gang-punched  into  the  new  card.   The  fields  must 
be  used  from  the  leftmost  field  to  the  rightmost  field.   However,  the 
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data  to  be  gang-punched  may  be  anywhere  in  columns  U2-80.  A  description 
of  the  first  field  follows.   The  same  format  should  be  followed  for  the 
other  fields. 

Columns  2-3  and  4-5  indicate  the  first  and  last  columns  on  this 
control  card  which  contain  the  gang-punch  data.   Columns  6-7  and  8-9 
indicate  the  first  and  last  columns  on  the  new  card  into  which  this 
data  is  to  be  punched. 

Sequencing  (Counting) 

Column  1  contains  a  C.    There  are  two  fields  with  identical 
formats:   Columns  2-13,  l8-29«   Columns  U2-80  are  used  for  storage  of  count 
data.   If  both  fields  are  not  needed,  the  first  field  must  be  used.   However, 
the  count  data  may  be  anywhere  in  coliimns  U2-80.   A  description  of  the  first 
field  follows.   The  same  format  should  be  followed  for  the  second  field. 

Columns  2-3  and  ^-5  indicate  the  first  and  last  columns  on  this 
control  card  which  contain  the  initial  value  of  the  counter.   Columns  6-7 
and  8-9  indicate  the  first  and  last  columns  on  the  new  card  into  which  the 
count  is  to  be  punched.   Columns  10-11  and  12-13  indicate  the  first  and 
last  columns  on  this  control  card  which  contain  the  increment  for  the 
counter. 
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Notes; 


(1)  The  execution  tape  is  used  by  the  Monitor  and  all 
translators  to  build  a  tape  containing  binary  card 
images  of  the  object  program  to  be  loaded  by  the  Loader. 

(2)  Tape  5  is  not  available  to  a  user  as  a  utility  tape. 
Although  the  logical  tape  number  5  in  F0RTRM  and  KAD 
programs  is  used  to  indicate  punch  output ^  this  output 
is  actually  put  on  tape  6  with  an  indication  to  HAV0C, 
the  lUol  program,  that  this  output  is  to  be  punched. 
The  actual  tape  5  is  used  for  CalComp  plotter  output. 

(3)  SCATHE  rewinds  tape  h   and  uses  tape  9  as  its  intermediate 
tape  when  it  encounters  the  MIDDLE  pseudo-instruction. 

(k)     Although  a  reserve  output  tape  is  normally  mounted  on 
this  unit,  a  user  may  use  tape  8  as  a  utility  tape  if 
necessary.   Since  this  tape  may  be  unready,  the  user 
must  put  in  a  $$  comment  card  stating  that  he  is  using 
tape  8.   If  this  $$  card  does  not  appear,  and  the  job 
attempts  to  use  tape  8,  it  will  be  terminated. 
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A13»2     Tape  Units  Available  to  the  User  for   Savemounts 

If  the  savemount  is  to  be  unprotected  when  mounted,  it  can  be 
mounted  on  any  of  the  available  units  before  execution  begins.   If  this 
is  done,  the  translators  or  any  of  the  system  routines  that  use  that 
particular  unit  will  write  on  the  savemount  tape. 

If,  however,  the  savemount  is  to  be  protected  when  mounted,  the 
following  units  can  be  used  as  a  savemount  before  execution  begins  ($  HALT 
following  $$  SAVEM0UNTs): 

Unit  10,  unless  an  ALG^L  post-mortem  dump  is  requested 

Unit  8,  any  time 

Unit  9,  if  only  SCATRE  programs  (without  a  MIDDLE  pseudo- 
instruction)  or  FASTRAN  programs  are  used 
The  following  units  may  be  used  to  savemount  tapes  before  execution  begins 
($  HALT  following  $$  SAVEMjZiUWTs )  if  no  translation  occurs: 

Units  10,  9,  k*,    2,  8 

The  only  remaining  utility  tape,  logical  number  3}    can  be  safely 
used  as  a  protected  savemount  only  when  a  halt  in  execution  is  preceded  by 
an  appropriate  comment  to  the  operator.   Tape  3  should  not  be  used  for  core 
loads  in  a  Ping-Pong  Job. 


*   Logical  unit  h   should  not  be  used  if  split-core  loading  is  necessary. 
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A13«3  Formats  of  Tracks  on  Disk  Module  0 


lype  1 
Type  2 

Type  3 
Type  k 


HA2,  RA^  k66   word  record  =  h68   -words 

HA2,  2  records,  each  with  RA  and  229  words  of  data  area  =  hGl   words 

HA2,  3  records,  each  with  RA  and  I5I  words  of  data  area  =  ^57  words 

HA2,  h   records,  each  with  RA  and  111  words  of  data  area  =  kk'^   words 


Tracks 

Cylinders 

Format 

0000-3999 

0-99 

Type  1:   1  record,  k68   wds.  total 

1+000-5999 

ioo-ii+9 

Type  2:   2  records,  k6l   wds,  total 

6000-9199 

150-229 

Type  1:   1  record,  ^68  wds.  total 

9200-9599 

230-239 

Type  3'      3  records,  ^+57  wds.  total 

9600-9999 

2U0-2U9 

Type  h:      k   records,  UU9  wds.  total 

HA2  =  Home  Address  Identifier 
RA  =  Record  Address 


Kv/l/y 
'■■■■I'].'-. 


Pore  II.  ;  I.;  ,,:li-'.j. 
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Appendix  14. 

Directory  of  the  "JOSlh-lhOl  System  in  the  Engineering  Research  Laboratory 


APJEA 

B1MAR.KS 

709^  Operations  Supervisor 
Room  111c 
Phone  3-^3^9 
(or  in  absence.  Computer 
Operator  or  Routine  Room 
Supervisor  on  duty) 
Room  llOa 
Fhone  3-3063 

Special  operating  questions 
Special  computer  scheduling 
Special  questions  pertaining  to  tape 

reservation  forms 
Paper  and  binar-y  card  stock 
Special  questions  on  tape  reservations 
Special  questions  pertaining  to  work  flow 

through  computers 
Machine  time  and  usage  reports 

Routing  Room 
Room  110a 
Phone  3-3063 

r.ar.d  in  work  for  running 

Return  of  completed  work 

Operating  questions 

Questions  on  work  flow  through  system 

Hand  in  tape  reservation  forms 

Special  Answering  Service 
Phone  3-0760 

Current  state  of  work  flow  through  system 

Daily  Message 
(printed  on  output  of 
each  job) 

Special  inf  oi^mat-i  on  of  cur-r-ent  iTpor-tance 

Consultants 
Room  111b 
Phone  3-^384 

Consideration  of  refunds  due  to  system  or 

machine  errors 
SFon-Math  195  P"'"ogra.mming  questions 

(not  service  programm-ing) 
Operating  and  programming  system  questions 
Undiagnosed  problems  or  errors 
Arij^  question  pertaining  to  Problem  Specification 

FormS;,  Change  in  P'roblem  Specificati      -.s 
Obtaining  and  handing  in  Problem.  Specific: .. 

?orm.s  and  Change  in  Problem  Specification 

Formes 
SHARE  Index 
ALCt0L  Index 

SYSI'EM  library  listings 
l^lOl  program  abstracts 
Any  questions  involving  the  system  library 

u 
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AREA 

REMARKS 

Librarians  and 
Keypunch  Operators 
Rooms  161  and  165 
Phone  3-3102  or  3-28li+ 

Mailing  list 

Call  orderS;,  card  stock 

Card  supplies  for  outside  keypunches 

Questions  concerning  keypunches 

Card  library  program  deck 

Subroutine  library  program  descriptions 

Standard  IBM  manuals 

Standard  DCS  m.anuals  and  handouts 

Coding  paper 

$  System  cards 

Questions  concerning  the  keypunch  service 

Mathematics  I95  Staff 
1201  W.  Stoughton 
Phone  3-O6U3 

Questions  on  Math  195 

Consultation  on  Math  195  machine  homework 

Course  Instructors 

Questions  on  homework  problems  in  classes 

other  than  Mathematics  195 
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Appendix  15» -  Location  of  Digital   Computer  Laboratory  Computing  Facilities 
on  the   Campus 
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Appendix  1? .   The  ALGOL  Algorithm  Index 

The  references  that  follow,  unless  explicitly  stated  otherwise, 
are  to  the  month,  the  year,  and  algorithm  number  published  in  the 
Communications  of  the  Association  for  Computing  Machinery.  The  pages 
from  this  magazine  containing  these  algorithms  have  been  copied  and  are 
available  in  Room  l68,  Engineering  Research  Laboratory. 
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INDEX  BY  SUBJECT  TO  ALGORITHMS,  1960-1965 


ALGORITHMS  NOT  IN  CACM  HAVE  BEEN  INCLUDED.  WHEN  KNOWN  TO  US. 
LIST  OF  MODIFIED  SHARE  CLASSIFICATION 


REAL  ARITHMET 
COMPLEX  ARITH 
TRIG  AND  INVE 
HYPERBOLIC  FU 
EXPONENTIAL  A 
ROOTS  AND  POW 
OPERATIONS  ON 
ZEROS  OF  POLY 
ZEROS  OF  ONE 
SUMMATION  OF 
QUADRATURE 
ORDINARY  DIFF 
PARTIAL  DIFFE 
DIFFERENTIATI 
INTERPOLATION 
CURVE  AND  SUR 
SMOOTHING 
MINIMIZING  OR 
MATRIX  OPERAT 
EIGENVALUES  A 
DETERMINANTS 
SIMULTANEOUS 
ORTHOGONALIZA 
SIMPLE  CALCUL 
CORRELATION  A 
RANDOM  NUMBER 
PERMUTATIONS 
SUBSET  GENERA 
OPERATIONS  RE 
INPUT  -  COMPO 
PLOTTING 
RELOCATION 
COMPILING 
SORTING 
DATA  CONVERSI 
SIMULATION  OF 
SYMBOL  MANIPU 
APPROXIMATION 
FUNCTIONS  ARE 
FLETCHER-MILL 
ALL  OTHERS 


IC,  NUMBER  THEORY 

METIC 

RSE  TRIG  FUNCTIONS 

NCTIONS 

ND  LOGARITHMIC  FUNCTIONS 

ERS 

POLYNOMIALS  AND  POWER  SERIES 
NOMIALS 

OR  MORE  TRANSCENDENTAL  EQUATIONS 
SERIES.  CONVERGENCE  ACCELERATION 

ERENTIAL  EQUATIONS 
RENTIAL  EQUATIONS 
ON 

FACE  FITTING 

MAXIMIZING  A  FUNCTION 
IONS.  INCLUDING  INVERSION 
ND  EIGENVECTORS  OF  MATRICES 

LINFAR  EQUATIONS 

TION 

ATIONS  ON  STATISTICAL  DATA 

ND  REGRESSION  ANALYSIS 

GENERATORS 
AND  COMBINATIONS 
TORS  AND  CLASSIFICATIONS 
SEARCH,  GRAPH  STRUCTURES 
SITE 


ON  AND  SCALING 

COMPUTING  STRUCTURE 
LATION 

OF  SPECIAL  FUNCTIONS... 

CLASSIFIED  SOI  TO  S23 .  FOLLOWING 
ER-ROSENHEAD,  INDEX  OF  MATH.  TABLES 


Al   REAL  ARITHMETIC,  NUMBER  THEORY 
7  EUCLIDEAN  ALGORITHM 
35  SIEVE  OF  ERATOSTHENES 
35   8-62(438) 
61  RANGE  ARITHMETIC 


4-60(240  ) 

3-61 ( 151) ,4-62(209) 

7-61(319) 
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68  AUGMENTATION 

72  COMPOSITIONS 

93  GENERALIZED  ARITHMETIC 

95  PARTITIONS 

99  JACOBI  SYMBOL 

114  PARTITIONS 

139  DIOPHANTINE  EQUATION 

223  PRIME  TWINS 

237  GREATEST  COMMON  DIVISOR 

262  RESTRICTED  PARTITIONS  OF  N 

263  PARTITION  GENERATOR 

264  MAP  OF  PARTITIONS  INTO  INTEGERS 


8-61 (339) ♦11-61(498) 

11-61(498) .8-62(439) 

6-62(344) ,10-62(514) 

6-62(344) 

6-62(345) ,11-62(557) 

8-62(434) 

11-62(556) 

4-64 ( 243) 

8-64(481 )  ,  12-64(702 ) 

8-65(493) 

8-65(493) 

8-65(493) 


A2   COMPLEX  ARITHMETIC 


2  116  COMPLEX 
2  186  COMPLEX 
2         COMPLEX 


DIVIDE 

ARITHMETIC 

ARITHMETIC 


8-62(435) 
7-63(386) 
BIT  1962(233) 


Bl   TRIG  AND  INVERSE  TRIG  FUNCTIONS 


206  ARCCOSSIN 
ARCSIN(Z) 
ARCCOS(Z) 
ARCTAN(Z) 
SIN  FCN.BY 
COS  FCN.BY 
TAN  FCN.BY 
ARCSIN   BY 
ARCTAN   BY 
229  ELEMENTARY 
241  ARCTAN(Z) 


CHEBYSHEV 
CHEBYSHEV 
CHEBYSHEV 
CHEBYSHEV 
CHEBYSHEV 


EXPANSION 
EXPANSION 
EXPANSION 
EXPANSION 
EXPANSION 


FCNS.BY  CONT.FRACT. 


9-63(519) 
BIT  1962(236) 
BIT  1962(236) 
BIT  1962(236) 
NUM. MATH. V4(411 ) 
NUM. MATH. V4(411 ) 
NUM. MATH. V4(412 ) 
NUM. MATH. V4(412 ) 
NUM. MATH. V4(412 ) 
5-64(296) 
9-64( 546) 


B2   HYPERBOLIC  FUNCTIONS 


SINH(X) 
COSH(X) 


BIT 
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02  100  PROCESSING 

02  101  PROCESSING 

02  137  NESTED  FOR 

02  138  NESTED  FOR 

02  EVALUATION 


OF  CHAIN-LINKED  LIST 

OF  CHAIN-LINKED  LIST 

STATEMENT 

STATEMENT 

OF  FCNAL  EXPRESSION 


6-62(346) 
6-62 (346) 
11-62(555) 
ll-62( 555) 
BIT  1965(137) 


R2 


R2   SYMBOL  MANIPULATION 
268  ALGOL  60  REF . LANG. EDI  TOR 


11-65(667) 


S   APPROXIMATION  OF  SPECIAL  FUNCTIONS... 
FUNCTIONS  ARE  CLASSIFIED  SOI  TO  S23 ,  FOLLOWING 
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FLETCHER-MI LLER-ROSENHEAD, 

.03  19  BINOMIAL  COEFFICIENTS 

;03  19   8-62(438) 

;)3  33  FACTORIAL  N 

,07        POLAR  TRANSF.  BY  CHEBYSHEV  EXP. 

,13  14  COMPLEX  EXPONENTIAL  INTEGRAL 

.13  20  REAL  EXPONENTIAL  INTEGRAL 

13  20   4-61(182) 

13  108  EXPONENTIAL  INTEGRAL 

,13  109  EXPONENTIAL  INTEGRAL 
13        EXPONENTIAL  INTEGRAL  EXPANSION 

13  EI(X)  BY  CHEBYSHEV  EXPANSION 
.14  31  GAMMA  FUNCTION 

.14  34  GAMMA  FUNCTION 

14  54  GAMMA  FUNCTION 
.14  80  GAMMA  FUNCTION 

14  147  DERIVATIVE  OF  GAMMA  FUNCTION 

14  179  BETA  RATIO 

14       GAMMA  FUNCTION 

14        GAMMA  FCN.  BY  CHEBYSHEV  EXP, 

14  221  GAMMA  FUNCTION 

14  222  INCOMPLETE  BETA  FCN. RATIOS 

14  225  GAMMA  FCN  WITH  COTROLLED  ACCY. 

15  11  HERMITE  POLYNOMIAL 
15  123  ERROR  FUNCTION 

15  123   10-63(618)93-64(145) 

15  180  ERROR  FUNCTION 

15  181  ERROR  FUNCTION 

15  185  ERROR  FUNCTION 

15        ERF(X)  BY  CHEBYSHEV 

15  209  ERROR  FUNCTION 

15  209   8-64(482) 

15  226  NORMAL  DISTRIBUTION 

16  13  LEGENDRE  POLYNOMIAL 
16  13   4-61(181) 
16  47  ASSOCIATED  LEGENDRE 

16  62  ASSOCIATED  LEGENDRE 

17  21  BESSEL  FUNCTION 
,17  22  RICCATI-BESSEL  FUNCTION 
17  44  BESSEL  FUNCTION 
17  49  SPHERICAL  NEUMANN  FUNCTION 
17  124  HANKEL  FUNCTION 
17  163  HANKEL  FUNCTION 

17  236  BESSEL  FCNS  OF  FIRST  KIND 

18  5  BESSEL  FUNCTION 
18  6  BESSEL  FUNCTION 
18  214  BESSEL  FUNCTION 

18  228  O-BESSEL  FUNCTION 

19  57  RERBEI  FUNCTION 

19  57   8-62(438) 

20  88  FRESNEL  INTEGRALS 
20  89  FRESNEL  SINE  INTEGRAL 
20  90  FRESNEL  COSINE  INTEGRAL 
;20  213  FRESNEL  INTEGRALS 
20       WEBER  FUNCTION 

i20        COMPLEMENTARY  FRESNEL  INTEGRAL 

.20  244  FRESNEL  INTEGRALS 


INDEX  OF  MATH 


EXPANSION 


FCN. 


FUNCTION 
FUNCTION 


TABLES 

10-60( 540)  .6-62( 347)  » 

2-61 ( 106) 

NUM. MATH. V4(413 ) 

7-60(406) 

10-60(540) »2-61 (105) 9 


7-62(388 
7-62 (388 
CHIFFRES 
NUM. MATH 
2-61( 105 
2-61 ( 106 
4-61( 180 
3-62( 166 
12-62(60 
6-63(314 
BIT  1962 
NUM. MATH 
3-64( 143 
3-64( 143 
5-64(295 
6-60(353 
9-62(483 


) »7-62(393) 

)  »7-62( 393) 

-V6( 187) 

.V4(413 ) 

)  »12-62(605) 

} »7-62(391) 

) 

) 

5) .4-63( 168) 

) 

(238) 

.V4(413 ) 

) 910-64(586) 

) ,4-64( 244) 

) 9l0-64( 586) 

) 

) »6-63(316) 9 


6-63(314) 

6-63(315) ,12-64(702) 

7-63(386) 

NUM. MATH. V4f414) 

10-63(616) 93-64( 148) » 


5-64(295) 
6-60(353) »2= 


611 105) 9 


4-61 ( 178 ) »8-63(446) 

7-61  I  320)  912-61 (544) 

11-60(600) 

11-60(600) 

4-61( 177) 

4-61(179) 

9-62(483) 

4-63( 161) 99-63( 522) 

8-64(479) 

4-60(240) 

4-60(240) 

ll-63( 662) »6-64(349) 


5- 
4- 


64(295) 
61  (  181  ) 


♦7-62(392) » 


5-62(280) 910-63(618) 
5-62(280) 910-63(618) 
5-62(281 ) 910-63(618) 
10-63(617) 911-64(661) 
BIT  1962(239) 
BIT  1962(192) 
ll-64( 660) 
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S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S21 
S22 
S22 
S22 
S22 
S22 
522 
522 
522 
522 
522 
522 
522 
522 
523 


55 

56 

73 

73 

149 

165 

10 

12 

36 

110 

111 

132 

184 

191 

192 


227 
234 


COMPLETE  ELL. INT.-FIR5T  KIND(K) 
COMPLETE  ELL. INT. -SECOND  KIND(E) 
COMPLETE  ELL. INT. (B) 
INCOMPL.ELL. INT,-FIR5T  KIND(K) 
INCOMPL. ELL. INT. -SECOND  KIND(E) 
INCOMPL.ELL. INT. (B) 
JACOBIAN  ELLIPTIC  SIN  FCN.(5N) 
JACOBIAN  ELLIPTIC  COS  FCN.(CN) 
JACOBIAN  ELLIPTIC  FCN.(DN) 
ELLIPTIC  INTEGRAL-FIRST  KIND 
ELLIPTIC  INTEGRAL-SECOND  KIND 
INCOMPLETE  ELLIPTIC  INTEGRAL 

10-62(514) ,2-63(69) ,4-63 ( 167) 
ELLIPTIC  INTEGRAL 
ELLIPTIC  INTEGRAL 
CHEBYSHEV  POLYNOMIAL 
LAGUERRE  POLYNOMIAL 
CHEBYSHEV  POLYNOMIAL 
PHYSICS  INTEGRALS 
PHYSICS  INTEGRALS 
PHYSICS  INTEGRALS 
ERLANG  PROBABILITY  FUNCTION 
HYPERGEOMETRIC  FCN. ( COMPLEX ) 
CONFLUENT  HYPERG . FCN. ( COMPLEX ) 
CONFLUENT  HYPERG. FCN .( COMPLEX ) 
FERMI  FUNCTION 
CHEBYSHEV  POLYNOMIAL  COEFF. 
RIEMANN  ZETA  FUNCTION 
POISSON-CHARLIER  POLYNOMIALS 


NUM. MATH. V5(296) 
NUM. MATH. V5(297) 
NUM. MATH. V5(297) 
NUM. MATH. V5(297) 
NUM. MATH. V5(298) 
NUM. MATH. V5(299) 
NUM«MATH.V5(299) 
NUM. MATH. V5(300) 
NUM. MATH. V5(301 ) 
4-61( 180) ,4-63( 166) 
4-61( 180) 
12-61( 543) ,12-61(544) 

12-62( 605)  ,4-63( 166) 

4-63( 163) 

6-60(353) ,4-61( 181) 

6-60(353) 

3-61( 151) 

7-62(389) ,7-62(393) 

7-62(390) 

ll-62( 551) 

7-63(386) 

7-63( 388  J  ,4-64( 244) 

7-63(388) ,4-64(244) 

BIT  1962(237) 

BIT  1963(141) 

5-64(295) 

BIT  1965( 141)        ; 

7-64(420) 


ALL  OTHERS 


Z  45  INTEREST  REFINEMENT 

Z  112  POINT  INSIDE  POLYGON 

Z  117  MAGIC  SQUARE 

Z  117  1-63(39) ,3-63( 105) 

Z  118  MAGIC  SQUARE 

Z  '    118  12-62(606) ,1-63(39) ,3-63(  105) 

Z  136  ENLARGE  A  GROUP 

Z  148  MAGIC  SQUARE 

Z  199  CALENDAR  CONVERSION 

Z  219  TOPOLOGICAL  ORDERING 

Z  CALCULATION  OF  EASTER 

Z  240  COORDINATES  ON  AN  ELLIPSOID 

Z  246  GRAYCODE 

1  252  VECTOR  COUPLING  COEFFICIENTS 

2  260  6-J  SYMBOLS 
Z  261  9-J  SYMBOLS 

Z  GRADER  PROGRAM 

Z  CALCULATION  OF  EASTER 


4-61 ( 178) ,9-63(520)  ; 
8-62  (434)  ,12-62(606); 
8-62 (435)  ,8-62(440)  , 

8-62(436) ,8-62(440) » 

11-62(555) 

12-62(605)  ,4-63(168) 
8-63(444) ,11-64(661) 
12-63(738) 

4-62(209) ,11-62(556) 
9-64( 546) 
l2-64( 701 ) 
4-65(217) 
8-65(492) 
8-65(492  ) 
CACM  5-65(277) 
C0MP.BULL.V9( 18) 


*  The  numbers  263  and  26^  were  each  inadvertently  assigned  to  two  algorithms.   When 
giving  references  to  these  algorithms^  please  be  careful  to  do  so  unambiguously. 
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1.   The  7094-lUOl  Computer  Installation 
1.1.   Description 

1.1.1.   General 

The  IBM  709^-1^01  computer  installation  is  a  part  of  the  Digital  Computer 
Laboratory  at  the  University  of  Illinois.   The  709^-1^01  computer  system  operates 
on  a  2U-hour  day^  7  day  a  week  schedule.   Programming  is  on  an  open-shop  basis; 
processing  of  programs  is  on  a  closed  shop  basis.   The  major  portion  of  the  work 
is  done  under  the  control  of  an  executive  system^  PORTHOS. 
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1.1.2.   Organization 

The  IBM  709^1-1^101  facility  occupies  a  portion  of  the  first  floor  of  the 
Engineering  Research  Laboratory  (ERL)  on  the  Urbana  campus.   All  elements  of 
the  staff  may  be  located  there. 


Administration  Office 

Room  168 

Extension 

3-0969 

Information  Services 

166 

3-0969 

Operations  Supervisor 

111c 

3-^3^+9 

System  Consultants 

111b 

3-^38U 

Library 

165 

3-2814 

Program  Development 

158, 

160,  162, 

16U 

and 

3-1772 
3-3539 

709U  Computer  Room 

157 

3-^380 

lUOl  Computer  Room 

165 

3-4387 

Routing  Office 

110a 

3-3063 

Keypunch  Rooms 

161  and 

165 

3-3102 

Hourly  Status  Report  (tape 

recorded) 

3-1634 

3-1635 

3-1636 

3-1637 

Further  directory  information  appears  in  Appendix  10. 
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1.1. 3-   Equipment 

The  following  is  a  list  of  the  equipment  available  for  use  at  the 
709I+-IUOI  facility. 

7O9U 

7109  and  7110  central  processing  unit  with  interval  timer,  storage  cell 
clock,  non-data  select  trap,  and  memory  protection-relocation. 

7151  console 

7302  core  storage 

7608  power  converter 

7618  power  control 

7607  I  data  channel  with: 

711  card  reader 

716  printer  with  program  accounting  clock 

721  punch 

7^0  and  780  cathode  ray  oscilloscopes 

Five  729  VT  tape  drives 

7617  data  channel  console 
7607  II  data  channel  with: 

Direct  data  connection 

Five  729  VT  tape  drives 

7617  data  channel  console 
7909  data  channel  with  763I  II  file  control,  I3OI  disk  store 
7606  multiplexor 

1^01  (two  complete  systems,  each  having) 
lUOl  Model  C-3  processing  unit 
IU02  card  reader  and  punch 
1U03  printer 

Two  729  V  magnetic  tape  drives 
lko6   core  storage 


Auxiliary  Preparation  equipment 

Card  punches  (27) 

Interpreting  Card  punches  (2) 
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Card  verifier  (l) 
Card  reproducer  (l) 
Card  sorter  (l) 

Alphabetic  Interpreter (l) 
Punched  Paper  tape -card  converter 
Punched  paper  card-tape  converter 
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1.2.   Programming  Services 

1.2.1.   System  Consulting 

As  computer  speed  and  complexity  increase;,  the  probability  of  user 
error  through  subtle  misuse  of  the  system  becomes  increasingly  higher.   Since 
the  majority  of  users  utilize  the  computer  facilities  as  a  tool  (in 
contrast  to  considering  the  computer  itself  as  the  main  object  of  interest), 
it  is  desirable  to  make  the  use  of  this  tool  as  efficient  and  pleasant  as 
possible  with  the  resources  available.   The  average  user  is  not  expected 
to  become  an  expert  on  the  internal  workings  of  the  operating  system;  on 
the  other  hand,  the  Digital  Computer  Laboratory  cannot  successfully 
undertake  to  do  programming  for  users.   A  realistic  approach  is  to  provide 
guidance,  in  the  form  of  consultants,  for  individual  users  who  experience 
difficulties  that  they  cannot  overcome  by  their  own  efforts.   This  implies 
that  before  any  user  approaches  the  consulting  staff,   he  should  have 
exerted  a  bona  fide  effort  toward  overcoming  his  difficulty  on  his   O'ati. 
The  Laboratory  realizes  that  guidance  concerning  the  use  of  the  system 
cannot  be  approached  casually;  hence,  a  consulting  staff  and  a  permanent 
consulting  room,  111b  ERL,  have  been  set  up.   A  consultant  is  available 
in  111b  Engineering  Research  Laboratory  (ERL)  from  8  AM  to  6  PM  Monday 
through  Friday  plus  Saturday  morning. 

A  schedule  showing  the  times  when  specific  consultants  are 
available  is  posted  on  the  door  of  room  111b  ERL. 

The  use  of  consultants  cannot  be  expected  to  substitute  for  a  careful 
reading  of  the  available  manuals  and  notices.   The  ultimate  responsibility 
for  the  success  of  any  programming  project  must  lie  with  the  user. 
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1.2.2.   System  Development 

The  Digital  Computer  Latioratory  is  designing  and  writing  an  automatic 
operating  system,  PORTHOS,  which  is  able  to  take  advantage  of  the  speed  and 
size  of  the  709^+  computer.   This  system  owes  much  to  that  in  use  at  the  Computation 
Center  of  the  University  of  Michigan  which  served  as  an  initial  nucleus  and 
point  of  departure.   The  aims  of  this  evolving  system  are  to  facilitate  user 
needs  (input  and  output  conversion,  dynamic  and  post-mortem  dumps,  etc.),  to 
minimize  human  intervention,  to  automate  the  updating  and  checking  of  laboratory 
records,  to  enable  fast  and  direct  communication  between  the  user  and  the  computer, 
and,  above  all,  to  maintain  maximum  flexibility  and  efficiency. 

The  following  user-oriented  features  of  the  system  are  now  available. 

1.  A  relocatable  variant,  SCATRE,  of  The  SHARE  Compiler -Assembler 
Translator,  SCAT; 

2.  The  IBM  Formula  Translator  II,  Fortran  II  (algebraic 
compiler  language); 

3.  An  Algorithm  Language  Translator,  ALGOL  (algebraic 
compiler  language); 

h.      The  University  of  Michigan  Algorithm  Decoder,  MAD 
(algebraic  compiler  language); 

5.  An  extensive  subroutine  library  accessible  by  all 
of  the  above  four  translators; 

6.  Dump  routines  to  aid  in  program  checkout; 

7.  Input/Output  routines waich  allow  efficient  use  of 
magnetic  tapes  with  minimum  inconvenience  to  the  user; 

8.  The  ability  to  execute  in  any  desired  order  or 
frequency  the  various  segments  of  a  multiple  core- 
load  job; 

9.  A  simulating  program  for  the  IBM  65O  computer; 
10.   Routines  to  smplify  use  of  the  I3OI  disk  storage 

equipment. 
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The  inclusion  of  more  than  one  algebraic  language  translator  is  a  result  of  the 
recognized  complementary  features  of  these  compilers.   For  example,  Fortran  II 
has  a  restricted  source  language,  while  MAD '  s  is  quite  flexible;  MAD's  compilation 
time  averages  ten  times  faster  than  Fortran's;  but  on  the  other  hand,  Fortran's 
object  program  in  general  contains  20  per  cent  fewer  instructions  and  may  operate 
up  to  twice  as  fast  as  MAD's.   Therefore,  users  should  take  these  facts  into 
consideration  when  choosing  an  algebraic  so^orce  language  for  their  problems, 
for  example,  choosing  MAD  for  short,  infrequently  run  but  frequently  compiled 
problems,  and  Fortran  II  for  exceptionally  long-running  problems. 

ALG0L  has  certain  unique  advantages  such  as  automatic  dynamic  storage 
allocation  and  use  in  expressing  complicated  logical  relationships,  but  does 
not  lend  itself  readily  to  tape  manipulations.   Compilation  time  averages  one 
sixth  as  long  and  running  time  for  object  programs  produced  by  the  compiler 
twice  as  long  as  those  F^RTRAJJ-compiled  programs.   The  version  of  709^  ALGOL 
in  use  was  written  and  developed  as  a  joint  project  involving  the  Laboratory 
and  the  ALCOR  group. 

An  evolving  statistical  package,   STATMON,   is.  included  in 
the  system.   This  package  will  ultimately  consist  of  a  control  program  and  an 
extensive  library  of  statistical  routines. 

The  system  is  being  designed  in  such  a  manner  as  to  allow  the 
addition  of  other  facilities  as  they  become  available,  such  as  compilers  like 
lEL  V,  COBOL,  COMTRAtI;  sort  and  report  generators;  computer  class  grading 
and  processing  programs,  etc. 
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1.2. 3«   Associated  Programmers 

Due  to  the  staff  and  budgetary  limitations,  the  Digital  Computer 
Laboratory  cannot  accept  the  responsibility  of  providing  service  programming 
on  the  applied  problems  of  users.   It  is  not  even  in  a  position  to  guarantee 
the  effective  recruiting  of  competent  programmers  who  can  be  hired  by  users. 
On  the  other  hand,  it  is  willing  to  act  as  a  clearing  house  in  order  to  put 
persons  wishing  to  program  in  contact  with  persons  desiring  programming 
assistance.   This  is  done  by  maintaining  a  file  of  information  forms  of  those 
persons  who  have  announced  to  the  Laboratory  their  willingness  to  accept 
programming  employment.   Any  persons  wishing  to  be  listed  as  available  for  such 
employment  should  contact  the  secretary  in  room  l68  of  the  Engineering  Research 
Laboratory.   Any  person  wishing  to  hire  programmers  is  invited  to  inspect  this 
file  by  contacting  the  secretary. 

In  order  to  keep  the  file  up  to  date,  those  programmers  who  obtain 
positions  should  inform  the  secretary  that  they  are  no  longer  available  so  that 
the  information  sheets  can  be  transferred  to  the  inactive  file. 
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1.3-   Library  Services 

1.3'1'   Program  Documentation 

Program  documentation  mainted  at  the  709'+~1^01  installation  includes 
both  locally  generated  programs  and  SHARE*  programs.   In  the  former  case,  the 
documentation  normally  includes: 

a)  program  write-up   (description) 

b)  source   deck 

c)  relocatable  column  binary  cards. 

In  the  latter  case,  the  documentation  consists  of  program  abstracts  and 
descriptions  in  loose  leaf  form.   The  SHARE  abstracts  may  be  examined  in 
Room  168  ERL  from  8  AM  until  12  noon  and  from  1  PM  until  5  PM,  Monday  through 
Friday. 


*An  organization  of  users  of  IBM  computers. 
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1'3'2.   Subroutines 

The  Subroutine  Program  Library  includes  programs  and  write-ups  from 
both  of  the  above  sources  as  well  as  from  other  sources.   All  the  programs  which 
have  been  written  or  adapted  for  the  PORTHOS  system  are  available  through  the 
Subroutine  Library  system,  which  includes  complete  programs  and  closed  subroutines 
on  cards  and  on  magnetic  tape.   The  Subroutine  Library  is  fully  discussed  in 
section  5- 
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1.3'3'   Reference  Publications 

A  set  of  IBM  Data  Processing  Manuals  and  Publications  for  7OO/7OOO 
series  machines  is  kept  in  room  168  ERL.  A  user  may  consult  these  documents 
during  the  hours  stated  in  section  1.3«1»  The  publications  must  normally  be 
used  on  the  premises;  no  provision  is  made  for  checking  out  materials. 
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1.3.^.   The  Mailing  List 

A  mailing  list  is  maintained  by  the  librarian,  and  a  copy  of  every 
document  published  by  the  709'+-1^01  installation  for  users  is  mailed  to  every 
individual  on  the  list.   It  is  vital  that  every  user  who  has  need  for  this  manual 
be  on  the  mailing  list;  since  it  will  be  kept  up  to  date  by  providing  updated 
pages  to  every  manual  holder.   The  updated  pages  will  form  a  part  of  the  DCL 
Bulletin  which  appears  from  time  to  time.   A  user  may  be  placed  on  the  mailing 
list  simply  by  so  requesting  at  the  desk  in  room  165  ERL. 
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l.U.   Educational  Activities 
1.^.1.   Formal  Courses 

Though  the  Digital  Computer  Laboratory  does  not  itself  offer  formal 
course  work  leading  to  a  degree,  there  are  a  number  of  courses  offered  by  the 
Laboratory  which  are  directly  related  to  the  design  and  use  of  digital  computers. 
Following  is  a  list  of  these  related  courses  and  a  description  of  each. 
Abbreviations  are  the  same  as  those  in  the  University  Bulletin. 

MATHEMATICS  19^  -  INTRODUCTION  TO  AUTOMATIC  DIGITAL  COMPUTING    ■"■'■•■ ■^•••■-■'-■■i''^''-- '■--•■•;■■ 

A  beginning  course  covering  topics  in  machine  organization^  problem  formulation, 
automatic  programming,  numerical  analysis,  machine  language  programming,  ahd 
applications  of  computers.   Students  use  the  IBM  709^  for  solving  problems.   I, 
II;  3  hotirs.   Prerequisite:   Sophomore  standing  and  one  year  of  college 
mathematics,  including  differential  calculus. 


MATHEMATICS  29^  or  ELECTRICAL  ENGINEERING  29^  -  INTRODUCTION  TO  THE  THEORY  OF 

DIGITAL  MACHINES 

An  introduction  to  the  general  organization  of  computers.   Number  systems.  Boolean 
algebra,  the  design  of  combinational  circuits,  and  sequencing  of  arithmetic  opera- 
tions are  discussed.   I,  II;  3  hours.   Prerequisite:   Junior  standing  in  engineering 
or  mathematics. 

MATHEMATICS  36^  or  AGRONOMY  36^  -  DIGITAL  COMPUTER  METHODS  FOR  STATISTICAL  DATA 

PROCESSING 

A  study  of  methods  for  efficient  utilization  of  high-speed  equipment  in  the 

processing  of  statistical  data.   Emphasis  is  on  principles  of  applications  of 

computing  equipment  to  the  solution  of  statistical  problems.   Students  are  expected 

to  solve  problems  on  the  computers.   I;  3  hours,  or  1  unit.   Prerequisite: 

Mathematics  195  and  a  300-level  course  in  statistics  or  statistical  methods  or 

equivalent,  or  consent  of  instructor. 

MATHEMATICS  387  -  INTRODUCTION  TO  NUMERICAL  ANALYSIS 

I  or  II;  3  hours,  or  1  unit.   Pr-erequisite :   Senior  standing,  calculus,  and  a  course 

in  differential  equations,  or  consent  of  instructor. 
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MATHEMATICS  391  or  ELECTRICAL  ENGIKEERDJG  391  -  BOOLEAU  ALGEBRAS  WITH  APPLICATIONS 

TO  COMPUTER  CIRCUITS,  I 

An   introduction  to  Boolean  algebra  with  a  discussion  of  the  elementary  applications 

to  set  theory,  logic,  and  both  relay  and  electronic  switching  circuits.   The  Harvard 

chart  and  other  methods  for  circuit  simplification  are  treated  both  as  applied  to 

single  output  and  multiple  output  circuits.   I,  II;  3  hours,  or  1/2  or  1  unit. 
Prerequisite:   Senior  standing;  consent  of  instructor. 

MATHEMATICS  392  or  ELECTRICAL  ENGINEERING  392  -  BOOLEAU  ALGEBRAS  WITH  APPLICATIONS 

TO  COMPUTER  CIRCUITS,  II 

The  notion  of  time  as  a  parameter  is  introduced  into  the  theoretical  treatment  of 

switching  circuits.   Examples  of  synthesis  of  time -dependent  circuits  are  given 

using  mathematical  techniques.   II;  3  hours,  or  1/2  to  1  unit.   Prerequisite: 

Mathematics  391  o^  Electrical  Engineering  391- 

ELECTRICAL  ENGINEERING  393  -  DIGITAL  COMPUTER  ELECTRONICS 

Transistor  theory  and  pulse  response  of  networks;  reliable  design  of  standard 

switching  circuits;  interrelation  of  components  and  systems;  timing  problems. 

I;  3  hours,  or  3/^  or  1  unit.   Prerequisite:  Electrical  Engineering  3^0^  3^1  and. 

Mathematics  29^  or  Electrical  Engineering  29^,  or  consent  of  instructor. 

MATHEMATICS  39^  or  ELECTRICAL  ENGINEERING  39^  -  LOGICAL  DESIGN  OF  AUTOMATIC  DIGITAL 

COMPUTER  CIRCUITS 

A  course  in  the  design  of  automatic  digital  computers.   Major  emphasis  is  on  logical 
structure  of  components  and  the  interrelations  necessary  for  automatic  operation. 
I,  II;  3  hours,  or  1  unit.   Prerequisite:  Mathematics  29^  or  Electrical  Engineering 
29^  and  senior  standing,  or  consent  of  instructor. 

MATHEMATICS  395  -  ADVAITCED  PROGRAMMING 

This  course  is  devoted  to  a  discussion,  by  means  of  classroom  and  laboratory 

examples,  of  the  efficient  use  of  computers  for  solving  problems.   Particular 

emphasis  is  given  to  examples  in  which  limitations  of  computers  have  been  overcome. 

I,  II;  3  hours,  or  1  unit.   Prerequisite:  Mathematics  195  and.  senior  standing 

or  consent  of  instructor. 
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MATHEMATICS  397  -  MATHEMATICAL  THEORY  OF  DATA  PROCESSING 

The  mathematical  structure  and  automatic  processing  of  extensive  files  of  data  are 
developed  employing  methods  from  statistics,  graph  theory,  and  information  theory. 
Topics  discussed  include  (l)  the  selective  screening  and  classification  of  data: 
pattern  recognition,  machine  abstracting,  optimum  encoding,  least  square  adjustment 
of  data,  and  (2)  file  organization  and  maintenance:   information  retrieval,  index- 
ing, and  scheduling.   I;  3  hours,  or  1  unit.   Prerequisite:  Mathematics  195^  or 
consent  of  instructor. 

MATHEMATICS  U^T  -  ANALYTICAL  PROBLEMS  IN  NUMERICAL  ANALYSIS 

A  study  of  the  various  mathematical  problems  arising  when  one  formulates  problems 

in  analysis,  such  as  the  solution  of  ordinary  or  partial  differential  equations,  for 

treatment  by  an  automatic  digital  computer.   Among  the  problems  discussed  are 

convergence  of  difference  equations  to  differential  equations  and  stability  of 

methods  for  approximately  solving  ordinary  and  partial  differential  equations. 

I,  II;  1  unit.   Prerequisite:   Mathematics  3^1)    or  consent  of  instructor. 

MATHEMATICS  U8q  -  SEMINAR  IN  APPLIED  MATHEMATICS 

I,  II;  1  unit.   Prerequisite:   Consent  of  instructor. 
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1.4.2.   The  Digital  Computer  Laboratory  Colloquium 

A  regularly  scheduled  activity  is  the  Colloquium,  held  weekly, 
to  which  outstanding  research  personnel  from  the  Laboratory  and  from  other 
institutions  are  invited  to  speak.   Lectures  concern  both  the  design  and 
the  use  of  digital  computers. 

Announcements  appear  in  the  University  calendar.   The  public  is 
invited. 


Date :  l+/l5/6i+ 

Section:  i.U.2. 

Page :  ^ 
Change : 


2.  Use  of  the  Computing  Facility 

2.1.   Conditions  of  Use. 

The  709^1-1401  computer  system  of  the  Digital  Computer  Laboratory  is 
available  to  any  individual  or  group  connected  with  the  University  of  Illinois 
usually  through  departmental  channels.   Conditions  of  use  are  as  follows. 

(a)  All  work  done  using  the  computer  requires  the  approval  of  a 
department  head.   In  some  instances,  the  approval  of  the  person  in  charge  of 
computer  service  satisfies  this  requirement. 

(b)  The  computer  should  ordinarily  be  used  only  in  connection  with 
non-classified  projects,  results  of  which  may  be  made  freely  available. 

(c)  Free  time  is  allocated  to  approved  projects  for  which  funds  to 
support  computing  charges  are  not  available. 

(d)  Any  projects  having  funds,  which  can  be  used  to  support  computing 
charges,  are  expected  to  bear  such  charges  (see  section  2.1.1.  -  Policy  for 
Charging  For  Computer  Use). 

(e)  Computer  time  is  charged  to  projects  accepting  charges  at  a  rate 
cost-accounted  every  six  months  by  federal  auditors. 

A  large  grant  from  the  National  Science  Foundation  has  made  the  purchase 
of  the  709^-1^01  system  possible.   Therefore,  when  research  is  published  and 
acknowledgment  is  made  to  the  709^-1^01  computing  facility,  acknowledgment  should 
also  be  made  to  the  National  Science  Foundation  by  the  parenthesized  remark 
(Partially  supported  by  a  grant  from  the  National  Science  Foundation,  NSFGP7OO). 

Details  of  securing  approval  for  use  of  the  system  appear  in  the  following 
sections. 
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2.1.1.  Policy  for  Charging  for  Computer  Use 

The  following  policy  has  heen  instituted  for  charging  for  the  use  of 
coraputer  time.  All  users  of  the  Computer,  supported  by  research  or  other  funds 
against  which  computing  costs  may  he  charged,  will  be  required  to  pay  an  hourly 
charge  for  each  hour  used.   The  department  will  receive  a  bill  associated  with 
each  problem  number  held  by  the  department  with  the  niunber  of  hours  used  during 
the  month  listed  and  with  a  corresponding  total  charge. 

Each  department  is  requested  to  make  allowances  for  machine  time  in  all 
new  contracts  which  are  negotiated  or  renewals  of  older  contracts. 

The  use  of  the  Coraputer  by  the  Digital  Computer  Laboratory  for  its  own 
research  programs  will  be  paid  for  in  accordance  with  the  above  policy. 

A.  H.  Taub 
January  1,  l^Gh 
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2.2.  Application  for  Use  of  Equipment 
2.2.1.   The  Form 

The  prospective  user  must  fill  out  only  one  form,  the  Problem 
Specification,  in  order  to  be  granted  permission  to  use  the  709^-1^01  computer 
facility.   This  Problem  Specification  form  (see  Appendix  h)   will  contain  the 
following  information : 

a.  a  description  of  the  problem  to  be  solved  in  terms  of  the 
field  of  interest  to  which  it  applies; 

b.  a  description  of  the  mathematical  principles  and  procedures 
involved; 

c.  a  discussion  of  the  way  in  which  the  computer  is  to  be 
used  to  solve  the  problem; 

d.  an  estimate  of  the  amount  of  machine  (709^)  time  that 
will  be  required; 

e.  a  statement  about  sponsorship  of  the  work  (thesis,  personal 
research,  contract  research,  etc.); 

f.  other  information  about  the  problem  necessary  for  its 
efficient  rijinning  within  the  computer  operating  system. 
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2.2.2.   Submission  and  Approval 

The  primary  purpose  of  the  ProlDlem  Specification  sheet  is  to  inform  the 
Laboratory  of  the  use  being  made  of  the  machine  and  to  aid  in  keeping  the  log  of 
machine  time.   In  addition  a  knowledge  of  the  uses  being  made  of  the  facilities 
enables  the  personnel  of  the  Laboratory  to  concentrate  attention  on  those  areas 
of  the  program  library  which  are  most  heavily  used  (see  sections  1.2.2^  and 

Every  problem  which  is  run  on  the  computer  must  have  a  specification 
number.  Except  for  short,  one-time  runs  for  self -education  and  experimentation 
(see  section  U.2.3«8),  the  running  of  every  problem  is  preceded  by  the  submission 
of  a  completed  Problem  Specification  sheet.   This  sheet  is  reviewed  and  under 
normal  conditions  the  user  is  notified  through  University  mail  of  approval  of  his 
request  by  issuance  of  a  problem  specification  number.   This  problem  specification 
number  becomes  a  part  of  the  identification  information  which  accompanies  every 
run  submitted  for  that  particular  problem  (see  section  4.2.2.1).   The  first  digit 
of  this  n-umber  is  the  last  digit  of  the  year,  the  second  stands  for  the  month 
(l  =  Jan.,  2  =  Feb.,  .  .  .  9  =  Sept.,  0  =  Oct.,  W  =  Nov.,  D  =  Dec),  while  the 
last  three  constitute  a  sequence  number  within  the  month.   Note  that  a  problem 
specification  number  is  associated  with  the  problem,  not  the  individual  computations 
associated  with  that  problem. 

A  different  problem  should  be  preceded  by  a  new  Problem  Specification 
sheet.   Processing  of  the  Problem  Specification  sheet  takes  about  a  week  elapsed 
time;  prospective  users  sho-uld  take  this  time  lag  into  consideration  when  planning 
to  use  the  computer. 

The  Laboratory  does  not  wish  to  exercise  any  unwarranted  surveillance 
or  censorship  over  the  problems  submitted;  the  Problem  Specification  does,  however, 
permit  the  Laboratory  and  its  staff  to  suggest  improved  and  more  efficient  methods 
which  might  exist  for  the  solution  of  some  submitted  problems. 
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application.   In  such  a  case  no  special  requirements  should  be  requested  and  all 
problems  assigned  should  fall  within  the  established  code-check  limits.   Class 
problems  expire  at  the  end  of  the  semester  in  which  the  class  is  taught. 

d)  Programming  Systems.   Presently,  the  available  systems  are:  MAD, 
ALGOL,  FORTRAN,  SSUPAC,  650  SIMULATE,  SCATRE,    and  STATMON.    (See 
section  5^  Programming  Systems) 

e)  Estimated  Time.   The  hourly  time  required  may  not  exceed  5^6  hours 
and  includes  translating  ( SCATRE,  MAD,  etc.)  and  dump  time  used  during  code- 
checking  as  well  as  production  running.   When  the  estimated  time  for  the  problem 
has  been  nearly  consumed  (hourly  time,  or  months,  whichever  occurs  first), 
messages  will  be  printed  on  the  output  informing  the  user  that  his  time  is 
elapsing.   If  he  needs  more  time,  he  must  fill  in  a  Request  for  Change  in 
Problem  Specification.   The  reckoning  of  calendar  time  will  begin  on  the  date 

of  the  first  computer  run  under  this  Problem  Specification  nimiber. 

f)  Billing  Number.   The  Digital  Computer  Laboratory  Billing  Number  is 
in  effect  a  contract  identification  number  between  the  using  department  and  the 
Laboratory.   Whenever  a  problem  is  initiated  for  which  the  using  department  wishes 
a  new  billing  identification,  the  field  for  "previous  DCL  Billing  Number"  on  the 
Problem  Specification  form  may  be  left  blank  and  a  new  DCL  Billing  Number  will  be 
assigned  for  the  problem.   In  this  case,  approval  on  behalf  of  the  user's 
department  must  appear  in  the  form  of  an  authorized  signature.   If  a  DCL  Billing 
Number  has  already  been  assigned  for  this  source  of  funds,  the  assigned  ^4— character 
billing  number  may  appear  here.   No  authorized  signature  is  then  required.   If 

the  user  requests  both  chargeable  time  and  free  time,  the  chargeable  time  will 
be  consumed  before  the  free  time. 

g)  Special  Requirements.   The  standard  operating  procedures  of  the 
operating  system  are  explained  in  section  k.      Certain  deviations  from  these  may 
be  permitted  while  still  operating  within  the  system.   The  items  under  "Special 
Requirements"  specify  the  possible  deviations  which  the  user  may  request. 

h)  Magnetic  Tapes.   Occasionally,  a  problem  will  require  the  saving  of 
data  tapes  from  run  to  run.   When  this  is  anticipated,  the  user  may  acquire  these 
tapes  in  one  of  three  ways:  he  may  use  tapes  owned  and  stored  by  the  Laboratory, 
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he  may  lease  new  tapes  from  the  Laboratory  to  he  stored  by  the  Laboratory,  or  he 
may  buy  tapes  elsewhere  and  store  them  himself.   (See  section  2.^.2.  for  a 
discussion  of  magnetic  tape  policies.) 

i)  Low  Density.   Magnetic  tapes  generated  elsewhere  may  have  information 
written  on  them  at  densities  of  200  or  55^  characters  per  inch  (cpi).   The  standard 
density  of  all  tapes  in  use  at  the  Digital  Computer  Laboratory  is  800  cpi;  hence  a 
user  must  have  low  density  pennission  for  these  tapes.   This  permission  should  not 
ordinarily  be  requested  for  the  purpose  of  generating  low  density  tapes  unless 
tapes  are  being  generated  to  be  sent  elsewhere,  where  low  density  tapes  are  required. 
In  such  a  case,  one  such  permission  will  be  granted  at  the  time  it  is  needed,  and  on 
a  single~run  basis.   If  the  tapes  need  to  be  read  more  than  once,  they  should  be 
copied  onto  another  tape  at  the  high  (standard)  density.   The  user  should  see  a 
consultant  in  room  111b  ERL  to  obtain  such  permission  (see  section  1.2.1.). 

j)   Copies  of  Printed  Output.   If  the  user  will  require  more  than  one  copy 
of  any  printed  output  generated  by  his  problem,  he  should  indicate  the  maximum 
number  of  copies  he  will  need  at  that  time.   This  applies  to  listings  of  his 
program  as  well  as  answers  generated  by  his  program.  •■   • 

If  the  requirement  for  multiple  copies  is  an  occasional  one,  and  multiple 
copies  are  not  required  at  every  run,  the  single-run  multiple  copy  permission  can 
be  obtained  from  a  consultant  in  room  111b  ERL  (see  section  1.2.1.),  and  no 
reference  need  be  made  to  multiple  copies  on  the  Problem  Specification  form 
If  more  than  10  copies  of  more  than  20  pages  are  desired,  the  1*401  should  be 
loaded  with  special  multilith  forms  and  output  placed  directly  on  them.   The 
desired  number  of  copies  can  then  be  run. 

k)   Full  Dump.   Users  will  ordinarily  require  (and  receive)  dumps  of  the 
regions  which  their  program  used.   In  some  unusual  cases,  it  may  be  necessary  to 
dump  also  the  regions  occupied  by  the  System  Execution  Coordination  Routines 
(see  section  6.2.).   In  such  cases,  a  $  FULL  DUMP  control  card  (see  section  U.2.2.2.) 
and  permission  are  both  required.   Full  durap^,  then,  implies  a  dump  of  the  entire 
core.   Requests  for  single-run  full  dumps  are  considered  by  the  consultant  in 
room  111b  ERL  (see  section  1.2.1.). 
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m)  Special  Cards  and  Special  Forms.   All  output  (punched  and  printed)  is 
processed  on  the  lUOl.   If  special  cards  or  forms  are  needed,  the  operator  must 
have  special  instructions  for  changing  the  forms  before  processing  the  output 
from  the  problem  (see  section  i+.2.i+.5)  and  must  make  arrangement  with  the  computer 
supervisor,  Room  111c,  ERL. 

n)  Own  l/O  Programming.   Users  will  usually  find  the  system-provided 
l/O  subroutines  adequate  for  their  needs.   Permission  for  own  l/O  programming 
will  be  permitted  when  necessary. 

o)  Relinquishment.   If  the  user's  program  cannot  be  run  under  system 
control,  then  provision  is  made  to  turn  over  the  computer  to  the  user's  program. 
The  user  is  then  completely  responsible  for  all  phases  of  programming  and  for 
instructing  the  operator  (see  section  U.3.). 

p)  CRT  Frames.   The  maximum  field  size  for  the  total  number  of  CRT  film 
frames  for  a  problem  is  5  digits.   The  number  of  frames  to  be  photographed  must 
be  right-justified  (see  section  U.2.2.6.). 

q)  Each  non-instructional  problem  specification  should  be  submitted  to  the 
head  of  the  respective  department  or  his  designated  representative  for  signature 
prior  to  submission  to  the  Digital  Computer  Laboratory.   In  the  event  of  Departmental 
disapproval,  the  specification  can  still  be  submitted  for  special  consideration  by 
the  Digital  Computer  Laboratory. 
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2.2.U.   Changes  in  the  Problem  Specification 

Often  it  'becomes  necessary  to  change  a  Problem  Specification  description 
sometime  during  the  life  of  that  problem.   Changes  may  become  necessary  if  the 
problem  being  undertaken  grows  or  changes  so  that  the  original  description  or 
request  should  be  modified  or  extended^  the  problem  needs  more  time,  the  amount 
of  funds  budgeted  is  exceeded,  the  need  to  reserve  tapes  arises  or  other  special 
features  of  the  operating  system  become  necessary. 

It  is  a  property  of  the  PORTHOS  Operating  System  that  all  such  information 
must  be  incorporated  into  and  stored  by  the  Monitor  program.   Hence,  any  time  a 
problem  specification  changes  it  is  necessary  to  modify  the  Monitor  so  that  the 
new  and  different  set  of  boundary  conditions  to  be  applied  to  the  problem  are 
known  to  the  Monitor. 

In  order  to  simplify  this  change  procedure,  a  form  is  provided  which  is 
almost  identical  to  the  original  Problem  Specification  form.   Thus,  the  user  is 
free  from  the  inconvenient  necessity  of  filling  in  a  complete  new  problem 
specification  form.   Changes  can  be  simply  noted  on  this  new  form. 

The  same  formats  and  justification  within  fields  should  be  followed  on 
this  form  as  in  the  original  problem  specification  form  (see  Problem  Specification 
Instructions  attached  to  every  Problem  Specification  form  and  see  section  2.2.3')' 

Each  non-instructional  problem  specification  change  should  be  submitted 
to  the  head  of  the  respective  department  or  his  designated  representative  for 
signature  prior  to  submission  to  the  Digital  Computer  Laboratory.   In  the  event 
of  Departmental  disapproval,  the  specification  can  still  be  submitted  for  special 
consideration  by  the  Digital  Computer  Laboratory 

A  copy  of  the  Request  for  Change  in  Problem  Specification  form  is  included 
in  this  manual  as  Appendix  6. 
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2.2,5'   Filling  Out  and  Handing  In  of  ProlDlem  Specification  Forms  and 
Requests  for  Change  in  ProlDlem  Specification 

It  is  one  of  the  goals  of  the  Laboratory  to  minimize  the  delay  and 
inconvenience  associated  with  the  problem  specification  procedure.  The  filling 
out  of  this  form  is  the  one  necessary  step  in  obtaining  access  to  the  "JO^k/lkOl 
system.   It  is  the  instrument  by  means  of  which  the  Laboratory  obtains  essential 
information  such  as  billing  status,  special  machine  requirements,  etc.   Errors 
on  these  forms  occasion  needless  delay  since  the  form  must  then  be  returned  via 
campus  mail  to  the  user. 

The  Laboratory's  policy  is  that  the  Consulting  Staff  will  be  available  to 
aid  the  user  in  filling  out,  checking,  and  receiving  Problem  Specification  forms. 
Users  are  encouraged  to  use  this  service  especially  if  they  are  unfamiliar  with 
the  Laboratory,  have  special  problem  requirements,  or  out-of-system  (relinquish) 
requirements. 

Hence,  these  forms  should  be  turned  in  to  a  Consultant  in  Room  111b  ERL 
during  normal  consulting  hours.   Forms  may  be  handed  in  at  the  Routing  Office, 
Room  110  ERL;>when  the  Consulting  Staff  is  not  on  duty  or  may  be  mailed  to  the 
Laboratory.   However,  since  the  forms  must  then  be  forwarded  to  a  Consultant  for 
checking  or  may  have  to  be  returned,  additional  delay  might  be  experienced. 
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2. 2.6'      ProlDleni  Abstracts 

The  purpose  of  the  problem  description,  or  abstract,  is  two-fold.   First, 
it  provides  the  Digital  Computer  Laboratory  with  a  means  of  knowing  for  what  purpose 
the  computing  equipment  is  being  used,  so  that  internal  programming  efforts  can  be 
directed  toward  fulfilling  needs  of  the  users;  and  second,  it  provides  a  written 
record  of  the  use  of  the  facility.   It  is  the  intention  of  the  Digital  Computer 
Laboratory  to  include  each  new  problem  abstract  (as  it  appears  on  the  associated 
Problem  Specification  form)  in  the  monthly  Technical  Progress  Report  of  the 
Digital  Computer  Laboratory. 

Examples  of  Problem  Abstracts  as  they  have  appeared  in  the  Technical  Progress 
Report  appear  below.   Each  abstract  title  is  preceded  by  an  eight  digit  identification. 
The  first  three  digits  are  merely  an  internal  sequence  number;  the  last  five  constitute 
the  Problem  Specification  number. 

633-30058    Electrical  Engineering.   Language  Analysis.   The  rank-frequency 
relationship  of  word  occurrences  in  various  natural  language  corpi  produced  under 
constraints  of  several  types  will  be  studied.   The  major  tool  will  be  a  routine 
recently  developed  which  accepts  natural  language  corpi  from  punched  cards,  compiles 
a  vocabulary  organized  according  to  both  word-length  and  initial  letter  and  outputs 
a  record  of  the  input  sequence  displaying  the  vocabulary  parameters  and  a  serial 
number  for  each  word  from  which  the  entire  material  may  be  recovered  if  desired. 
Detailed  provisions  are  included  for  handling  numerical  or  algebraic  inputs. 

183-39063    Civil  Engineering  391.   Problem  1.   Traverse  Closiire.   This  problem 
is  designed  to  familiarize  students  with  the  Digital  Computer  Laboratory  system. 
The  traverse  closure  problem  discussed  in  class  is  used  as  an  example.   By  simple 
geometric  relations  and  logical  decisions,  the  sums  of  x  and  y  components  of  an 
arbitrary  number  of  line  segments  are  obtained.   A  complete  deck,  including  control 
cards,  source  program,  and  data  is  supplied,  and  the  student  has  only  to  punch  his 
ID  card.   The  output  is  used  to  discuss  the  details  of  the  PORTHOS  system. 
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2.3.  Logging  and  Control  of  Computer  Time 
2.3.1«  Accounting  for  Computer  Time 

Every  job  processed  through  the  PORTHOS  monitor  system  results  in  a 
single  punched  card,  the  time  card,  which  contains  the  problem  number,  user  name, 
compile  time,  assembly  time,  execution  time,  output  page  count,  card  counts,  etc. 
for  that  job.   Similar  cards  are  prepared  manually  from  a  hand  kept  log  for  all 
jobs  run  outside  the  system  (relinquish  jobs).   The  deck  consisting  of  all  these 
■cards  collected  for  a  given  month  constitutes  the  input  data  to  the  several 
accounting,  bookkeeping,  and  billing  routines.   These  in  turn  produce  the  various 
Laboratory  reports  described  in  section  2. 3' 3'  below. 


Date: 
Section: 
Page : 
Change : 


2.3.1. 
1 


2.3-2.   Notices  to  Users  Concerning  Lapsing  Time 

Information  concerning  the  total  approved  running  time  and  the  calendar 
duration  concerning  each  active  problem  specification  number  is  stored  and  retained 
by  the  monitor.   These  quantities  are  checked  and  updated  on  each  computer  run 
of  the  problem.   When  either  approaches  exhaustion  a  message  to  that  effect  is 
printed  on  the  user's  output.   The  user  is  thus  cautioned  to  reapply  for  additional 
time  (if  needed)^  using  the  Request  for  Change  in  Problem  Specification  form  which 
may  then  be  completed  before  the  actual  lapse  of  the  originally  approved  time. 
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2.3'3«   Laboratory  Reports 

2.3«3'1-   Internal  Reports 

The  time  cards  referred  to  in  2.3.I.  are  used  to  prepare  an 
extensive  set  of  records,  kept  on  file  within  the  Laboratory.  These  list  each 
run  (with  information  discussed  in  2. 3.1.)  made  on  the  computer,  as  well  as  summary 
information  totaled  by  user  name,  problem  specification  number,  department,  etc. 
This  information  Is  used  to  create  further  reports,  to  resolve  questions  concerning 
how  the  equipment  was  used,  monitor  the  system,  etc. 

2. 3. 3- 2.   The  Technical  Progress  Report 

Each  month  the  Laboratory  publishes  and  widely  circulates  its 
Technical  Progress  Report.   One  section  of  this  pertains  to  the  IBM  7094/l401 
computing  system.   This  part  contains : 

a)  General  information  about  the  system  and  descriptions  of  all  new 
Library  Routines. 

b)  Abstracts  of  all  new  Problem  Specifications  submitted  during  the 
month  (see  section  2.2.5.) 

c)  Information  on  usage  of  the  l401's  and  709^  for  the  month.   This 
consists  of  a  general  breakdown  of  time  spent  on  each  machine  on 
each  of  several  functions,  error  counts  and  causes  for  each  machine, 
and  for  the  709^  time  and  number  of  runs  for  both  class  work  and 
research  used  by  each  department. 

2.3'3«3«   Departmental  Monthly  Statements 

Each  month  a  statement  is  sent  to  the  head  of  every  department 
or  administrative  unit  which  used  the  computer  during  that  month. 

The  report  consists  of  the  following  parts: 

a)   The  Departmental  Monthly  Summary.   This  gives  the  hours  approved  during 
the  month,  the  total  num.ber  of  hours  approved  to  date,  the  total 
number  of  hours  of  computing  time  received  by  the  department  during 
the  month,  the  total  hours  received  by  the  department  to  date,  and 
the  total  number  of  approved  hours  not  yet  received.   Each  of  these 
categories  is  further  divided  into  free  and  paid  for  work. 
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b)  The  Monthly  Departmental  Summary  of  Machine  Running  Time.   The  total 
running  time  is  broken  down  into  each  problem  specification  number 
active  for  the  department  and  is  further  broken  down  with  respect 

to  free  or  paid  for  work. 

c)  A  set  of  individual  sheets  describing  each  problem  specification 
or  problem  specification  change  approved  during  the  month.   These 
sheets  consist  of  two  types:   (l)  A  very  complete  summary  description 
of  each  new  problem  specification  approved  and  initiated  during  the 
month  and  (2)  a  rather  brief  data  sheet  describing  each  old  specificati 
which  has  had  during  the  month  an  approved  change  involving  the  number 
of  hours  pertinent  to  that  problem  specification. 

2.3.3.J+.   Billing 

Each  month  a  bill  is  sent  pertaining  to  each  Problem  Specificatic 
Number  for  which  an  ability  to  accept  bills  for  computing  charges  was  indicated 
on  the  original  Problem  Specification  Form.   This  bill  is  submitted  on  the  standard 
University  of  Illinois  voucher  to  the  address  indicated  on  the  original  Problem 
Specification  form.   It  contains  the  problem  specification  member,  number  of 
hours  used,  the  amount  due  at  the  current  rate,  the  name  of  the  prime  user,  the 
source  of  funds  and  the  pertinent  University  account  number. 
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2.^.   Supplies 

2.'+.l.   Expendable  Supplies 

Under  this  classification  come  such  items  as  Hollerith  cards,  printer  paper, 
programniing  forms,  and  rubber  bands.   All  such  items,  in  normal  quantities,  are 
supplied  without  charge.   If  unusually  large  quantities  of  such  supplies  or 
specialized  formats  are  required,  then  the  user  must  purchase  them  either  by 
special  arrangement  with  the  Digital  Computer  Laboratory  or  through  some  vendor 
of  such  supplies.   The  standard  printer  paper  at  the  Digital  Computer  Laboratory 
is  11  inches  by  ik   7/8  inches  in  size,  ruled  three  lines  per  inch  on  one  side 
only,  punched  at  both  edges  for  the  IBM  lij-03  printer  sprockets. 


For  the  various  functions  within 
be  used. 


the  Laboratory  the  following  card  forms  should 


Card 

Code 

Function 

Format 

Number 

Color 

Stripe 

Corner  Cut 

Column  Binary 

Binary 

L5^320 

Natural 
or  Brown 

None 

Left 

SCATRE  Programs 

SCAT 

C50859 

Natural 

Grey 

Left 

F0RTRAN  Programs 

fjzSrtraw- 

MAD 

C8U761 

Natural 

Yellow 

Left 

MA.D  Programs 

F0RTRAN- 
MAD 

G8i^T6l 

Natural 

Green 

Left 

ALG0L  Programs 

Data 

5081 

Natural 

Red 

Left 

Data 

Data 

5081 

Yellow 

None 

Left 

Data 

5081 

Green 

None 

Left 

Data 

5081 

Blue 

None 

Left 

System  Control 

Cards 

SCAT 

C50859 

Natural 

Blue 

Left 

SCAT 

C50859 

Natural 

Salmon 

Left 

Problem  Run  Cards 

(or  "Identification 

11 

Cards ) 

Run 

G8it-76o 

Natural 

None 

None 

The  Laboratory  reserves  the  right  to  reject  decks  not  conforming  to 
these  standards . 
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2.i+.2.  Non-expendable  Supplies 

The  major  item  which  falls  into  this  category  is  magnetic  tape.  All  input 
and  output  to  the  709^  computer  is  on  magnetic  tape.  The  vast  majority  of  users 
are  not  concerned  with  the  use  their  problems  make  of  magnetic  tape  as  an  input/ 
output  medium.  The  tape  is  reusable,  and  the  length  of  time  a  single  problem  ties 
up  a  portion  of  a  tape  is  relatively  small. 

There  are  users,  however,  who  must  preserve  large  quantities  of  information 
from  one  computer  run  to  another.  This  is  best  done  by  use  of  magnetic  tape,  and 
the  total  time  such  a  reel  of  tape  is  to  be  tied  up  may  be  considerable.   In  such 
cases,  the  user  has  three  alternatives.  He  may 

1)  use  tapes  owned  and  stored  by  the  Digital  Computer  Laboratory 

2)  lease  new  tapes,  which  will  be  stored  by  the  Digital  Computer 
Laboratory;  or 

3)  buy  tapes  elsewhere,  in  which  case  the  user  is  responsible  for 
their  storage. 

If  the  user  chooses  alternative  (l),  then  he  is  restricted  to  a  total 

"tie-up  factor"  of  6  tape-months.  That  is, 

(number  of  months  of  use)  X  (number  of  tapes)  <  6. 

The  user  should  specify  whether  he  requires  a  long  (2^00  feet)  reel  of  tape  or 

needs  only  a  short  (1200  feet)  one.   A  long  tape  should  not  be  specified  if  a 

short  one  will  suffice. 

If  the  user  chooses  alternate  (2),  then  he  will  lease  either  short  or 

long  new  tapes  from  the  Digital  Computer  Laboratory  and  he  is  not  restricted  to 

any  tie-up  factor. 

If  the  user  chooses  alternate  (3),  then  he  may  purchase  tapes  from  any 

source.  They  will,  however,  be  acceptable  to  the  Digital  Computer  Laboratory 

only  if  they  meet  certain  requirements.   A  standard  color  code  is  in  effect  at 

the  Digital  Computer  Laboratory  for  tape  reels : 

red  -  system  master  tapes 

blue  -   system  input 

white  -  system  output 

yellow  -  utility  (scratch) 

gray  -   savemounts  (see  section  U.2.2.3«lO 
(leased  or 


owne 


d) 
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Hence^  any  tape  that  is  to  be  saved  for  a  user  must  "be  on  a  gray  reel.   Further, 
it  must  be  heavy  duty  mylar  tested  for  800  bits/inch  and  must  be  properly  labelled. 
A  standard  form,  Request  for  Tape  Lease  or  Tape  Labelling  (see  Appendix  7), 
must  be  completed  and  filed  with  the  Digital  Computer  Laboratory  Routing  Office  at 
110  ERL  if  tapes  are  to  be  saved.   This  must  be  done  in  addition  to  filing  the 
Problem  Specification  form.   The  user  should  allow  at  least  a  week  for  the  processing 
of  the  form.   He  will  be  notified  by  mail  of  his  tape  identification  numbers.   The 
user  should  appear  in  person  at  the  Routing  Room  a  few  days  before  he  actually 
intends  to  start  using  the  tapes,  whichever  alternate  he  chooses,  and  assure  that 
all  is  in  readiness  for  him. 
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Automatic  Processing  of  Programs 
3.1#  General 

In  the  early  days  of  academic  computers,  few  areas  of  research  had 
formulated  their  mathematical  problems  in  such  a  way  as  to  require  massive 
amounts  of  calculation.   Usually,  ingenious  procedures  had  been  devised  to 
avoid  great  amounts  of  calculation.   Indeed,  so  simple  a  thing  as  the  inver- 
sion of  any  but  the  smallest  of  matrices  was  carefully  avoided,  and  analyses 
involving  such  calculations  were  thought  of  as  "interesting,  but  wholly 
academic." 

Thus,  to  those  individuals  who  did  have  computations  to  make,  who 
had  formulated  their  problems  in  such  a  manner  as  to  be  numerically  solvable, 
the  greatest  problem  was  not  one  of  scheduling  time  on  a  computer.   The 
greatest  immediate  difficulty  was  that  of  preparing  programs  to  solve  the 
problems  at  hand. 

Programming  was  a  tedious  process,  requiring  time  and  patience; 
machine  language  coding  quickly  gave  way  to  symbolic  coding,  which  developed 
from  simple  symbolic  representations  of  machine  instructions,  to  the  advanced 
systems  we  know  today,  including  pseudo -operations,  macro-instructions,  and 
relocatable  assembly.   The  search  for  more  programming  ease  led  to  the 
development  of  the  algebraic  procedural  languages  and  investigations  of 
artificial  languages  in  general. 

By  this  time,  many  of  the  persons  who  had  heretofore  shunned  large-scale 
calculations  began  to  take  a  new  look  at  their  problems  and  to  reformulate  them 
in  the  "new"  terms.   The  general  knowledge  of  and  appropriateness  of  algebra 
led  naturally  to  algebraic  formulations  in  many  cases  and  the  availability  of 
the  algebraic  languages  rapidly  increased  the  work  load  on  computers.   Securing 
computer  time  of  sufficient  length,  but  more  importantly,  at  appropriate 
intervals,  is  now  a  significant  problem  of  the  computer  user.  As  users  came 
to  have  less  and  less  direct  contact  with  the  computer  and  "impartial  third 
parties"  operated  them,  "turn-around  time"  became  increasingly  important. 
Paralleling  the  development  of  the  interest  in  using  computers  and  the  algebraic 
languages  which  simplified  programming  was  an  increase  in  the  complexity  and 
particularly  the  speed  of  computers  themselves.   Those  groups  responsible  for 
providing  computer  services  of  various  kinds  found  themselves  faced  with  the 
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task  of  increasing  the  efficiency  of  usage  of  the  hardware  -  to  minimize 
wasted  time  -  so  that  all  who  wished  could  have  full  access  to  the  hardware 
facilities.  A  closely  allied  task  was  that  of  providing  ready  (and  efficient) 
access  to  the  general  purpose  subroutines  which  were  being  written. 

In  addition  to  these  needs  for  increased  efficiency  in  the  proces- 
sing of  programs  and  increased  convenience  in  using  "library"  routines  was 
the  desire  to  keep  more  accurate  records,  automatically,  on  the  usage  of  the 
machines,  to  standardize  input /output  programming  and  data  transmission 
procedures,  and  to  reduce  operator  error  by  reducing  the  requirement  for  human 
intervention  during  the  processing  of  programs. 

These  requirements  pointed  to  some  kind  of  "caretaker"  program  -  a 
program  that  would  reside  in  the  computer  system  at  all  times  and  be  available 
to  the  central  processing  unit  (CPU)  to  direct  the  activities  of  the  entire 
system  except,  of  course,  when  the  CPU  was  under  the  control  of  a  user's 
program.   Many  such  executive  programs  have  been  written,  but  they  serve 
generally  the  same  end:   that  of  increasing  the  efficiency  of  the  man-machine 
system. 

The  PORTHOS  executive  system  is  one  such  program,  or  more  accurately, 
collection  of  programs.   In  addition  to  the  general  requirements  mentioned  above, 
its  structure  was  dictated  by  the  specific  requirements  of  the  University  of 
Illinois,  and,  of  course,  by  the  features  of  the  IBM  709^/lUol  computer  complex 
operated  by  the  Digital  Computer  Laboratory. 

Briefly,  PORTHOS  is  an  operating  system  which  allows  nearly  automatic 
processing  of  "batches"  of  programs,   PORTHOS  and  its  sub-systems  reside  on 
two  magnetic  tapes  (the  master  tapes)  and  include,  besides  programs  to  monitor 
operations  and  keep  records,  routines  to  control  access  to  various  input/output 
units  (the  execution  coordination  routines),  to  automatically  handle  conversion 
of  data  into  forms  for  either  human  or  machine  consumption  (the  input/output 
with  conversion  routines),  an  assembly  program  for  both  absolute  and  relo- 
catable forms  of  programs  (SCATRE),  three  algebraic  compilers  (FORTRAM  II, 
MAD,  and  ALGOL-60),  an  extensive  library  of  subroutines,  several  specialized 
programming  systems  (e.g.,  STATMON),  and  a  loader  program  which  loads  previously 
translated  programs  into  arbitrary  areas  of  core  for  execution  (SCATRE  and  the 
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algebraic  compilers  translate  programs  into  relocatable  form).   ProA'^ision  is  also 
made  for  "chaining"  several  programs  together  so  that  one  after  the  other  can 
be  called  into  core  and  executed  (Ping~Pong). 

The  subroutine  library  is  discussed  in  section  5?  input/ output  with 
conversion  in  section  G,   and  the  other  features  of  PORTHOS  in  the  remaining 
parts  of  section  3- 
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3.2  The  PORTHOS  Executive  System 
3.2.1  Introduction 

The  PORTHOS  executive  system  was  developed  at  the  Digital  Computer 
Laboratory,  University  of  Illinois,  to  process  jobs  efficiently  on  the  IBM 
709^  computer,  and  is  "based  in  large  part  upon  a  similar  executive  system 
designed  at  the  University  of  Michigan  Computing  Center.   Its  use  minimizes*. 

(1)  the  time  involved  in  changing  from  one  person's  program  to 
another,  since  this  is  handled  automatically  by  the  computer, 

(2)  operator  errors  in  handling  the  programs,  since  most  of 
the  decisions  are  made  by  the  system, 

(3)  errors  in  Digital  Computer  Laboratory  accounting  procedures, 
since  time  records  are  maintained  directly  by  the  system  by  means 
of  a  special  clock, 

{k)      the  time  involved  in  carrying  a  program  to  completion,  by 

allowing  immediate  execution  of  a  program  which  first  needs 

translation,  and 

(5)  programming  time,  since  a  variety  of  translators  is  available. 

Two  typeo  of  translators  are  available  in  the  PORTHOS  executive 
system,  compilers  and  assemblers.   The  fundamental  distinction  between  the 
two  types  is  that  instructions  in  a  program  written  in  an  assembly  language 
are  usually  translated  one  for  one  into  machine  language,  while  compilers 
translate  statements  consisting  of  a  string  of  operators  and  operands  into 
sequences  of  machine  code.   The  assembler  available  in  the  system  is  called 
SCATRE  (for  SCAT  Compatible  Assembler,  Translator,  RElocatable  for  the  IBM 
709^).   The  compilers  which  are  available  are  MAD  (Michigan  Algorithm  Decoder), 
FORTRM  II  (FORmula  TRANslator),  and  ALGOL-60  (ALGOrithmic  Language),   The 
MAD  translator  was  written  at  the  University  of  Michigan  Computing  Center,  the 
FORTRAN  II  translator  was  written  by  IBM,  and  the  ALGOL-60  translator  was 
written  at  the  University  of  Illinois  by  individuals  from  the  ALCOR  Group  in 
Europe  and  from  the  Digital  Computer  Laboratory.   Manuals  covering  the  use  of 
each  of  these  languages  are  available  from  the  library  in  Room  I65,  Engineering 
Research  Laboratory.   Brief  descriptions  of  each  appear  later  in  this  manual. 
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The  system  may  be  roughly  described  as  follows.   The  Monitor,  SCATHE, 
the  compilers;  the  Loader,  and  the  Library  of  subroutines  are  all  maintained  on 
two  magnetic  tapes,  called  the  master  tapes,  which  are  always  accessible  to  the 
computer.  As  the  jobs  are  submitted  for  running  by  the  users,  they  are  grouped 
into  categories  (see  section  k.2,3i   according  to  various  criteria,  and  taken 
to  the  1^01  computers  in  "batches"  of  jobs,  all  of  the  same  category.   The  jobs 
in  each  batch  are  written  onto  a  magnetic  tape,  called  the  system  input  tape, 
by  one  of  the  off-line  l401  computers.   This  tape  is  mounted  on  an  on-line 
tape  unit  when  the  709^  computer  has  finished  processing  the  previous  batch. 
After  the  input  tape  is  mounted,  the  operator  by  means  of  console  operations 
calls  in  the  Monitor,  which  in  turn  reads  in  the  first  job  from  the  input  tape 
for  processing.  After  examining  the  Problem  Run  card  (see  section  4.2.2.1^, 
the  Monitor  begins  to  work  its  way  through  the  input  deck,  performing  the  actions 
indicated  by  the  programmer.   Input  cards  for  the  SCATHE  assembler  or  for  the 
compilers  require  translation,  so  each  section  of  these  cards  is  preceded  by  a 
set  of  control  cards,  recognized  by  a  $  in  column  1  and  no  $  in  column  2.   These 
cards  are  called  $  control  cards,  and  are  described  in  detail  in  section  4.2.2. 3« 
A  typical  $  control  card  may  have  the  form 

$     FjZ^RTRAlJ,  PUNCH  y!iBJECT 

indicating,  in  this  case,  that  the  cards  which  immediately  follow  require 
translation  by  the  FORTRAN  compiler,  and  that  the  translated  program,  the  object 
program,  is  to  be  punched  out  on  cards  in  column-binary  form.   Whenever  the 
Monitor  in  working  its  way  through  the  input  deck  finds  a  $  control  card,  it 
thus  knows  how  the  cards  which  follow  are  to  be  processed.  A  single  job  may 
contain  sections  in  MAD,  SCATHE,  FORTRAN  and/or  ALGOL,  each  with  appropriate 
$  control  cards,  as  well  as  column  binary  cards,  which,  of  course,  do  not  require 
translation  and  which  need  not  be  identified  by  $  control  cards. 

If  the  first  set  of  $  control  cards  contains  the  control  instruction 
Gp   (there  may  be  more  than  one  $  control  card,  each  with  one  or  more  instructions, 
for  each  section  of  the  program) ,  all  sections  of  the  program,  whether  contained 
on  cards  in  binary  form  as  part  of  the  input  deck  or  generated  by  a  compiler  or 
assembler,  are  recorded  on  a  separate  magnetic  tape,  which  is  called  the 
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"execution"  tape.   When  the  program  has  "been  completely  translated,  it  is  loaded 
from  the  execution  tape  into  core  to  be  executed. 

If  errors  are  detected  during  assembly  or  compilation  of  some  section  of 
the  input  deck,  no  further  saving  of  any  binary  instructions  is  made,  and  the 
program  is  not  executed.   Translations  of  remaining  sections  are  usually  performed, 
thus  providing  a  complete  scan  of  the  deck  for  errors.   It  should  be  -understood 
that  the  translators  on  a  later  run  may  find  other  more  subtle  errors,  even  after 
the  original  errors  have  been  corrected.   At  loading  time,  the  system  loader 
automatically  calls  in  any  library  subroutines  needed  by  the  program  but  which 
were  not  supplied  as  part  of  the  input  deck.   If  at  least  one  such  needed  subroutine 
is  not  available  on  the  library  tape,  an  appropriate  comment  is  output  to  the  user 
and  the  job  is  terminated.  After  the  successful  or  unsuccessful  execution  of  a 
program  and  possible  subsequent  dumping  of  diagnostic  infoimation,  the  Monitor 
automatically  calls  in  the  next  job  on  the  input  tape. 
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3.2.2,  Prograraming  Conventions  of  the  System 

Because  the  Monitor  passes  directly  from  one  jolD  to  the  next,  a  program 
should  not  terminate  its  execution  by  stopping  the  machine,  but  should  instead 
provide  for  returning  control  to  the  system.   Programs  written  in  a  compiler 
language  will  usually  have  this  provision  automatically  included  in  their  machine 
language  versions,  since  a  return  to  the  system  occurs  when  the  program  tries 
to  read  more  input  data  then  has  been  provided,  or  when  the  program  executes 
the  physically  last  executable  statement  in  the  compiler  input,  or  source, 
program.   The  latter  situation  means  that  the  computer  simply  "runs  off  the  end" 
of  the  program.   The  first  method  is  the  most  common  way  to  relinquish  control 
to  the  system;  the  program  is  simply  written  to  always  return  to  the  statement 
which  calls  for  input  data.   If  there  is  more  data  to  be  processed,  it  is  read 
in  and  the  program  continues  as  before.   If  there  is  no  further  data,  control 
is  returned  automatically  to  the  system. 

Programs  written  in  SCATRE  may  return  to  the  system  by  executing  the 
pseudo-instructior^ 

CALL  SYSTEM 

and  programs  written  in  MAD  or  FORTRAN  may  return  to  the  system  by  executing  one 
of  the  following  statements  if  the  automatic  methods  described  above  are  not 
convenient: 

EXECUTE  SYSTEM.  (MAD) 

CALL  SYSTEM  (FORTRM) 

In  case  the  execution  of  the  program  is  unsuccessful  (for  example, 
due  to  an  infinite  loop  or  an  illegal  stop),  the  7094  operator  will  call  in 
a  dump  program  which  is  part  of  the  system.   This  program  checks  to  see  if  the 
program  called  for  a  dump  in  case  of  trouble,  and  causes  a  dump  if  it  was 
desired.  A  dump  is  simply  a  listing  in  octal  form  of  the  contents  of  the  core 
locations.   Several  different  types  of  dumps  are  available  to  the  user, 
depending  on  what  parts  of  core  he  is  interested  in.   They  are  discussed  in 
section  4.2.2.3.8.   The  Monitor  then  resumes  control  and  calls  in  the  next 
program  for  processing. 
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Several  other  conventions  of  the  system  are  as  follows.   Input  is 
always  in  the  form  of  card- images j  that  is,  each  call  for  input  from  the 
input  tape  receives  the  image  of  one  card  in  the  input  deck.   FORTRM  programs 
appear  to  write  punch  output  on  tape  ^,   with  the  statement 

WRITE  OUTPUT  TAPE  5:>  (list) 

but  this  is  automatically  intercepted  and  written  in  a  special  form  for  punching 
on  the  output  tape.  A  full  description  of  the  uses  of  the  several  tape  units 
during  different  phases  of  processing  a  job  is  found  in  Appendix  13- 

The  master  tapes,  the  on-line  card  reader  and  punch,  and  all  sense 
switches  and  keys  are  reserved  for  use  by  the  system.  Under  no  circumstances 
may  any  program  running  under  system  control  refer  to  this  equipment. 

Library  subroutines  will  generally  preserve  index  registers  and  the 
sense  indicator  register,  but  should  not  be  relied  upon  to  preserve  any  other 
registers,  such  as  the  accumulator,  the  MQ,  etc.,  or  special  areas  of  core 
such  as  Erasable  Storage.   For  information  regarding  specific  details  of 
register  usage,  the  description  of  the  subroutines  in  question  should  be 
consulted. 
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3.2.3,  The  Executive  System  Monitor 

An  executive  system  is  a  large  set  of  programs  which  perform  many  of 
the  scheduling  and  accounting  operations  previously  done  by  hand.   The  main 
control  rests  in  a  Monitor  program^  which  is  one  part  of  the  system.   The 
Monitor^  which  is  itself  located  on  a  magnetic  tape  is  read  into  core  as  it 
is  needed^  brings  in  from  the  input  tape  (which  is  normally  prepared  off-line) 
one  program  after  another  and  directs  preparation  of  each  program  for  execution. 
The  preparation  may  consist  of  translating  instructions  from  some  language 
convenient  to  the  user  into  machine  code.  Programs  which  are  very  large  may 
be  broken  into  segments,  each  segment  being  large  enough  to  fill  the  available 
area  of  core  storage  by  itself.   Such  a  setment  is  referred  to  as  a  core  load, 
and  the  Monitor  provides  certain  facilities  for  easily  calling  in,  during  execution, 
one  core  load  after  another.   This  process  is  called  Ping-Pong  and  is  fully 
described  in  section  3- 2. 4. 7. 

Programs  processed  by  the  PORTHOS  executive  system  may  contain  sections 
which  need  assembly  by  SCATHE,  translation  by  MAD,  FORTRAN  or  ALGOL,  or  which 
may  already  be  in  binary  form  as  a  result  of  some  previous  translation  or  assembly. 
During  the  processing,  the  Monitor  notes  from  the  first  set  of  $  Control  cards 
whether  or  not  the  program  which  is  finally  produced  in  binary  machine  language 
is  to  be  executed  and  sets  a  switch  to  "execute".   The  switch  may  be  subsequently 
set  by  the  Monitor  to  "not  execute"  in  case  of  an  unsuccessful  assembly  (due, 
for  example,  to  undefined  or  multiply-defined  symbols  in  SCATRE),  or  unsuccessful 
compilation  by  MAD,-  FORTRAN  or  ALGOL,  or  for  some  other  reasons,  such  a  non-binary 
card  image  occiorring  among  binary  card  images.   As  soon  as  the  switch  is  set  to 
"not  execute",  binary  cards  which  are  found  on  the  input  tape  and  binary  sections 
of  program  generated  by  assemblies  or  compilations  are  no  longer  saved. 

As  long  as  the  switch  is  set  to  "execute",  however,  all  binary  sections 
of  program,  whether  generated  by  the  computer  during  the  current  run  or  arriving 
as  input  cards  from  previous  translations,  are  saved  on  the  execution  tape. 
After  all  translations,  if  the  switch  is  still  set  to  "execute",  the  program 
(except  for  library  subroutines  not  provided  in  the  input  card  deck)  is  found 
on  the  execution  tape  in  binary  form.   Wlien  a  $DATA  card,  a  $BINARY  card,  or 
the  last  of  the  cards  for  the  current  job  is  encountered  (some  programs  have 
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no  data)^  a  part  of  the  executive  system,  the  system  Loader,  is  called  in  "by 
the  Monitor  and  the  loading  phase  of  the  job  is  hegion.   It  is  important  to 
remember  that  the  program  on  the  execution  tape  is  in  binary  card- image  form, 
whether  it  arrived  on  binary  cards  or  was  generated  on  this  rim.  The  Loader 
cannot  tell  the  source  of  the  binary  instruction  nor  does  it  need  to  know. 
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3.2.4,  The  System  Loader 

3.2.U.1»  Introduction:  Relocatable  Programs 

The  Loader  has  several  jobs  to  perform.   It  must  load  into 
core  the  main  program  and  the  various  subroutines  so  that  they  do  not 
overlap  in  storage;  it  must  call  in  from  the  library  those  subroutines 
needed^  but  not  yet  present;  and  it  must  establish  the  linkage  between  these 
various  programs  and  subprograjns  so  that  they  may  refer  and  transfer  to 
one  another ;  even  though  each  was  written  without  knowledge  of  the  order 
in  which  they  would  be  loaded,  or  where  they  would  eventually  reside  in  core. 

In  order  to  accomplish  these  tasks,  the  Loader  must  have 
available  certain  information  about  each  of  the  subprograms  and  the  main 
program.   The  information  consists  of: 

(1)  The  amount  of  storage  to  be  set  aside  for  each 
program  and  subprogram; 

(2)  The  number  of  other  subroutines  to  which  the  current 
subroutine  or  program  may  transfer  during  execution; 

(3)  The  requirements  of  this  program  for  space  in  the 
temporary  storage  set  aside  for  use  by  the  main  program 
and  subroutines  (known  as  Erasable  and  Program  Common); 

(h)     The  names  by  which  each  program  may  be  referred  to  by 
other  programs  or  subroutines; 

(5)  The  point  of  entry  implied  by  the  use  of  each  of  the 
names  in  (4); 

(6)  The  location  within  the  prograin  of  the  names  in  (7)  below; 

(7)  The  names  of  other  subroutines  to  which  this  program 
or  subroutine  may  transfer  during  execution. 

Items  (1)  through  (6)  are  presented  to  the  Loader  on  a  binary  card 
called  the  Program  Card,  the  image  of  which  immediately  precedes  the  program 
on  the  execution  tape.   The  format  of  this  card  appears  in  section  3.2.U.9.2. 
The  names  referred  to  in  (7)  are  part  of  the  program  itself,  occurring  at 
the  very  beginning  of  the  set  of  instructions.   There  may  be  no  such  names, 
of  course,  in  which  case  they  are  omitted,  and  the  number  in  (2)  is  zero. 

Date:  ^/15/6U 

Section:  3.2.U. 

Page :  1 
Change : 


When  they  do  occur,  they  constitute  the  Transfer  Vector.   In  some  programs 
or  subprograms,  storage  may  be  reserved  below  the  Transfer  Vector,  so  (6) 
indicates  where  the  Transfer  Vector  starts. 

In  the  case  of  a  large  program  which  has  been  split  up  into  several 
core-loads  (a  Ping-Pong  Job;  see  section  3'2.^.7»  )>    standard  column-binary 
transition  cards  (see  section  3.2.^.9.^*1  separate  the  core-loads  on  the  tape, 
so  that  the  Loader  can  tell  when  the  end  of  a  core-load  occurs. 

All  programs  and  subroutines  are  here  assiimed  to  be  in  relocatable 
form.   This  means  that  they  are  written  in  such  a  way  that  the  Loader  may 
move  them  to  any  section  of  the  core  storage,  and  internal  references  to 
data  and  other  instructions  are  automatically  adjusted  for  the  move.   This 
adjustment  is  known  as  "relocation".   Since  certain  instructions,  such  as 
"shift  the  accumulator  to  the  right  6  binary  places"  (ARS  6  in  SCATRE) 
should  not  be  affected  by  a  move  in  storage,  the  Loader  must  know  which 
instructions  are  to  be  adjusted,  and  which  are  not  to  be  adjusted  in  the 
relocation  process.   The  special  relocation  information  needed  by  the  Loader 
is  contained  on  every  relocatable  instruction  card  (see  section  3.2.U.9.3*) 
for  each  of  the  instructions  occurring  on  that  card,  and  thus  is  available 
to  the  Loader  when  it  examines  these  cards.   The  details  of  how  this 
information  is  transmitted  are  discussed  in  section  U.2.5«3'   It  should  be 
remembered  that  for  programs  produced  by  MAD,  FORTRAN  and  ALGOL,  the 
Program  Card,  the  Transfer  Vector,  and  the  relocation  information  are  all 
automatically  provided  by  the  translator.   SCATRE  automatically  provides 
relocation  information  in  every  relocatable  binary  program  it  produces, 
and  normally  provides  the  Program  Card  and  Transfer  Vector  also. 

The  action  of  the  Loader  in  preparing  the  program  for  execution 
may  be  described  as  follows. 

The  first  thing  the  Loader  does  is  to  store  throughout  available 
core,  except  for  the  areas  occupied  by  the  low-core  Execution  Coordination 
Routines,  the  Monitor,  and  the  Loader  itself,  a  transfer  instruction  to  a 
special  subroutine  which  resides  in  low  core.   This  transfer  instruction  is 
called  the  Core  Constant,  and  is  discussed  in  section  3-2. ^.3-   When  a 
program  is  subsequently  loaded,  it  will  overwrite  many  of  these  transfer 
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instructions,  but  should  an  illegal  transfer  occur  during  execution,  it 
will  often  be  to  one  of  these  transfer  instructions;  the  system  can  then 
regain  control,  and  output  an  error  message  to  the  user  indicating  an 
erroneous  transfer  to  this.   Often,  this  enables  this  user  to  quickly 
determine  where  the  program  went  astray. 

The  first  thing  the  Loader  reads  from  the  execution  tape  is  the 
Program  Card  for  the  first  subroutine  or  main  program  on  the  tape.*  Items 
(l)  through  (3)  are  recorded  for  later  reference,  and  items  (U),  (5),  and  (6) 
are  entered  in  a  table  called  the  Subroutines  Present  Table.   The  remaining 
instruction  cards  of  the  program  are  then  loaded,  until  another  Program 
Card  is  encountered,  signaling  another  program  or  subprogram.   Each 
instruction  card  image  is  loaded  and  relocated  according  to  the  loading 
address  it  carries.   Even  the  first  program  is  relocated,  since  the  system 
reserves  a  block  of  locations  in  low  core.   This  amount  of  relocation, 
lOOOOn  at  present,  is  subject  to  change  at  any  time.   After  the  entire 
subroutine  or  program  is  loaded,  the  relocation  amount  is  increased  by  the 
length  of  this  program,  known  from  (l)  above.   This  insures  that  the  next 
program,  when  relocated,  will  not  overlap  the  program  just  loaded.   The 
process  just  described  is  then  repeated  for  the  next  program  or  subprogram, 
lintil  an  entire  core-load  has  been  loaded  into  core.   For  single-core  (not 
Ping-Pong)  jobs,  this  means  the  entire  program,  and  therefore  the  entire 
execution  tape. 

During  this  process,  the  main  part  of  the  Loader  has  been  occupying 
a  section  of  high  core  (that  is,  the  part  of  core  storage  with  the  highest 
addresses).   The  Subroutines  -  Present  Table  is  located  just  below  the 
Loader,  and  grows  downward  toward  the  programs  that  are  being  loaded,  which 
in  turn  are  growing  upward  toward  the  Loader.   If  an  overlap  occurs  between 
the  program  being  loaded  and  the  subroutine  table,  an  appropriate  comment 
is  output  to  the  user,  and  the  entire  process  is  terminated,  since  the 
Loader  can  no  longer  perform  its  tasks.   After  all  the  programs  have  been 
loaded  from  the  execution  tape,  the  Subroutines-Needed  Table  is  created  just 
above  the  loaded  programs.  It  may  happen  that  the  Subroutines-Present  Table 

*This  is  the  case  if  no  $  BINARY  control  card  appears  in  the  first  group  of 
control  cards.   In  such  a  case,  a  binary  transition  card 
would  appear  first  on  the  execution  tape. 
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and  the  Subroutines -Needed  Table  will  overlap;  in  this  case  the  loading  process 
is  terminated;  and  an  indication  is  given  to  the  user  of  the  amount  of  overlap. 
Assuming  no  overlap,  then,  the  subroutines  which  are  still  needed  must  come 
from  the  subroutine  library  tape,  or  the  program  cannot  be  executed.   The 
names  still  needed  are  therefore  checked  against  a  master  list  of  entries 
in  the  library,  and  only  if  all  needed  subroutines  are  available  is  a  search 
of  the  library  made. 

If  subroutines  are  needed  which  are  not  available,  an  appropriate 
comment  is  output  to  the  user  with  a  list  of  the  missing  subroutines  for  each 
core  load,  and  the  program  is  not  executed,  even  if  execution  was  requested. 
A  list  is  also  printed  of  subroutines  which  may  inadvertently  have  been 
loaded  by  the  user  more  than  once  within  a  core  load,  but  the  loading  process 
is  not  terminated  by  this  action;  only  the  first  copy  of  a  multiply-loaded 
subroutine  is  actually  used.   If  all  of  the  needed  subroutines  are  available 
in  the  library,  they  are  then  brought  into  core.   Each  such  subroutine  is 
preceded  by  a  Program  Card  image  and  is  treated  in  exactly  the  same  manner 
as  subroutines  and  programs  already  loaded.   Finally,  the  entire  program  is 
situated  in  core,  but  is  still  not  quite  ready  to  execute.   The  Loader  must 
now  establish  the  linkages  between  programs,  so  that  each  will  know  where 
the  subroutines  to  which  it  must  transfer  are  located.   Since  the  entry 
point  for  each  subroutine  present  is  available  in  the  Subroutines-Present 
Table,  the  Loader  needs  only  to  scan  the  Transfer  Vector  of  each  program 
or  subprogram  (which  it  can  find  from  item  (6)),  and  replace  the  names  it 
finds  there  by  a  transfer  instruction  to  the  address  of  the  subroutine  entry- 
After  all  the  linkages  are  established,  the  Loader  stores  the  core  constant 
on  top  of  itself,  turns  off  various  switches  and  the  sense  lights,  and 
transfers  to  the  beginning  of  the  main  program  to  begin  execution. 

The  reader  will  note  that  the  use  of  item  (3)  has  not  yet  been 
outlined.   The  size  of  Erasable  storage  needed  by  the  current  program  is 
actually  obtained  as  the  lowest  of  all  such  addresses  encountered,  and  this 
is  then  the  size  of  Erasable  Storage  needed  to  accommodate  all  of  the 
subroutines  and  programs.   It  may  happen  that  the  Loader  will  recognize 
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that  the  Erasable  area  and  the  Program  actually  will  overlap  during 
execution.   When  this  is  the  case,  the  loading  process  is  terminated,  with 
an  appropriate  comment  output  to  the  user  for  each  core  load. 

3.2.i+.2»  COMMON,  PROGRAM  COMMON,  and  ERASABLE 

PROGRAM  COMMON  and  ERASABLE  are  used  in  MAD  and  SCATRE,  while 
COMMON  is  used  in  FORTRAN.   The  very  top  of  high  core  may  be  used  by  any 
program  or  subroutine  for  temporary  (erasable)  storage.   This  may  be 
shared  by  and  destroyed  by  any  other  program  or  subroutine.   COMMON,  as 
used  in  FORTRAN,  is  exactly  the  same  as  ERASABLE,  except  that  is  starts 
206^Qlocations  below  the  top  of  high  core,  which  is  at  location  32767   . 
PROGRAM  COMMON,  as  used  in  MAD  and  SCATRE,  is  located  just  above  the  low  core 
area  used  by  the  system,  and  is  used  primarily  as  a  communication  region 
between  subroutines  within  one  core  load  or  between  core  loads  in  Ping-Pong. 
The  storage  of  data  in  ALGOL  is  entirely  dynamic,  and  the  user  ordinarily 
does  not  know  where  his  data  is  located  in  core;  in  fact,  its  location  may 
change  with  time  during  the  execution  of  a  single  program.   Hence,  the 
concepts  of  PROGRAM  COMMON,  COMMON,  and  ERASABLE  have  no  meaning  for  the 
user  of  ALGOL.   The  user  should  see  the  appropriate  translator  manuals 
for  details  on  how  to  use  these  specialized  storage  areas. 

3.2.4.3^  The  Core  Constant 

Before  loading  either  a  single-core  job  or  the  initially  executed 
core  load  of  a  Ping-Pong  job,  all  locations  of  storage  from  the  top  of  low 
core  (lOOOOo)  to  the  bottom  of  the  Monitor  (currently  occupying  locations 
60000q  to  70000g)  are  preset  to  the  octal  number  +007i+OOi+035'+l  (TSX  35^1;^); 
called  the  core  constant.   After  loading,  the  locations  from  the  top  of  the 
Monitor  (or  the  Program  Break  if  it  is  greater  than  7OOOO0)  to  location 
77752o  are  also  preset  with  the  core  constant.   Hence,  unless  a  variable's 
value  is  loaded  with  the  program  (i.e.,  unless  the  value  of  the  variable 
is  in  some  way  defined  prior  to  the  start  of  execution),  its  value  at  the 
start  of  execution  will  in  most  cases  be  +OO7UOOI4O354IQ.   The  one  exception 
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involves  those  variables  which  axe  located  between  60000n  and  TOOOOq  when 

o         o 

the  Program  Break  is  below  TOOOOn-   Execution  will  be  initiated  with  the 

Monitor  program  still  in  that  region. 

If  printed  out  by  the  object  program^  the  core  constant  will  appear 

as  follows : 

A  or  C  conversion  0(0-bJ 

I  conversion  (FORTRAN)  38^0 

I  conversion  (MAD  or  SCATRE)       IOO676592I 
F  conversion  0 

E  conversion  I.88U5173OE-37 

For  Ping-Pong  programs,  the  region  from  TOOOOr,  to  77752o  is 

preset  with  core  constants  only  for  the  last  core  load. 

3.2.U.4*  The  Transfer  Vector 

The  Transfer  Vector  of  a  program  or  subprogram  consists  of  the 
names  of  all  the  other  subprograms  referred  to  by  the  program.   It  usually 
occurs  at  the  beginning  of  the  program.   In  the  case  of  references  to  a 
subprogram  with  more  than  one  entry  point,  a  name  is  listed  for  each  entry 
point  to  which  reference  is  made.   The  reader  should  note  that  subprograms 
as  well  as  main  programs  may  have  a  Transfer  Vector,  since  a  subprogram 
may  call  for  other  subprograms  in  turn.   When  a  program  has  a  Transfer 
Vector,  the  location  of  the  first  name  in  the  vector  is  indicated  on  the 
Program  Card  for  that  program.   It  usually  occupies  relocatable  location  0 
in  the  compiled  deck.   Each  name  in  the  list  is  counted  as  one  word  of  the 
program.   It  should  be  carefully  noted  that  the  Program  Card  lists  entry 
points  to  the  current  program  or  subprogram,  while  the  Transfer  Vector 
indicates  other  subprograms  which  are  used  by  this  program  or  subprogram. 

3.2.^.5*  Program  Cards 

SCATRE,  MAD,  FORTRAN  and  ALGOL  automatically  produce  object 
program  decks  in  relocatable  column-binary  form.   Instructions  are  usually 
assigned  at  translation  time  to  consecutive  storage  locations  starting  at 
0,  and  all  location  references  are  relative  to  0.   When  a  relocatable  binary 


deck  is  loaded,  location  references  within  individual  instructions  are  adjusted 
to  the  actual  locations  occupied  by  the  program  in  storage. 

Control  information  for  the  relocation  process  is  provided  to  the 
Loader  by  Program  Cards,  which  appear  at  the  front  of  the  main  program  deck 
and  at  the  front  of  each  subprogram  deck.   A  program  card  specifies  the 
number  of  locations  to  be  occupied  by  the  program.   This  number  is  used  as 
an  increment  for  relocating  an  immediately  following  program.   The 
increments  specified  by  successive  program  cards  are  cumulative.   Program 
cards  contain  other  information  required  by  the  Loader  to  interpret  symbolic 
cross-references  between  the  program  and  its  subprograms  and  between 
subprograms  which  call  on  other  subprograms.   Program  cards  are  automatically 
supplied  as  needed  by  the  translators  and  may  be  recognized  by  a  12-punch 
in  column  1.   The  detailed  structure  of  the  Program  Card  is  described  in 
Section  3. 2. U. 9.2. 

3.2. U. 6,  The  Loader  Map 

At  the  completion  of  the  loading  of  each  core-load  of  a  job,  a 
map  of  storage  is  produced.   It  is  printed  as  part  of  the  user's  output. 
This  map  gives  the  name  and  the  relocation  amount  of  each  subroutine 
loaded  (the  relocation  amount  for  low   core  subroutines  is  given  as  OOOOO). 
Subroutines  brought  in  from  the  library  are  indicated  by  an  asterisk  *    .      The 
relocation  amount  of  the  main  program  is  identified  by  the  name  (MAIN). 
Three  additional  numbers  are  produced  as  well.   It  should  be  remembered  that 
all  numbers  in  the  map  are  octal. 

(eras)  —  This  is  the  lowest  address  reserved  in  high  core 

as  Erasable  Storage. 
(SUBT)  —  This  is  one  less  than  the  lowest  address  in  the 
Subroutines  Present  Table  maintained  by  the 
Loader  during  loading  time.   It  indicates  the 
current  effective  size  of  the  Loader. 
(prog)  —  This  is  the  upper  edge  of  the  section  of  core 
into  which  the  main  program  and  subroutines 
have  been  loaded. 


Date: 

3-2.^. 

Section: 

Page: 

7 

Change : 

If  any  of  these  three  sections  of  core  becomes  excessively  large,  there  is 
the  possibility  of  overlap.   If  such  occurs,  the  following  comment  may  be 
produced: 

PROGRAM  AED  ERAS.  OVERLAP  BY  XXXXX  (OCTAL)  LOGS. 
In  this  case  (PROG)  exceeds  (ERAS),  and  the  program  may  have  to  be  segmented 
by  means  of  Ping-Pong. 

A  comment  will  follow  the  map  indicating  the  number  of  locations 
not  used  by  the  program.   This  is  the  space  between  (PROG)  and  the  less  of 
(SUBT)  or  (eras),  and  the  program  may  be  expanded  to  use  this  much  additional 
storage o 

3.2.U.7,  Ping-Pong 

Ping-Pong  is  the  process  of  optionally  calling  and  passing  control 
to  one  of  several  complete  self-contained  programs  (core  loads)  that  comprise 
a  complete  Ping-Pong  program.   The  Ping-Pong  package  is  often  a  large  program 
which  has  been  broken  up  into  complete  self-contained  subprograms^  which 
will  be  referred  to  simply  as  programs.   Each  program  which  calls  in  another 
one  must  contain  the  appropriate  subroutine  specifying  which  program  is  to 
be  called  next. 

The  programs  that  comprise  a  Ping-Pong  package  must  have  compatible 
COMMON  Statements  (FORTRAN)  or  PROGRAM  COMMON  Statements  (MAD)  for  variables 
referenced  by  more  than  one  program  (core  load).   The  COMMON  (or  PROGRAM 
common)  Statement  is  written  to  insure  that  aUL  references  to  a  given 
variable  refer  to  the  same  storage  position  no  matter  which  program  contains 
the  reference.   It  should  be  noted  that  COMMON  and  PROGRAM  COMMON  produce 
different  effects  and  should  not  be  used  together  without  extreme  care. 
In  fact,  MAD  and  FORTRAN  sections  should  be  mixed  in  an  input  deck  only 
with  great  caution.   The  dynamic  storage  allocation  feature  of  ALGOL 
makes  it  infeasible  to  mix  ALGOL  programs  with  programs  written  in  other 
languages,  except  when  the  latter  appear  as  subroutines  to  the  former,  and 
are  properly  linked  to  the  main  ALGOL  program. 
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Each  program  in  the  Ping-Pong  package  must  be  followed  by  either 
a  $BREAK  control  card  or  a  standard  coliunn -binary  transition  card  (see 
section  i+.2.2.  3.  9f  and  3.2.i|.9A).   Every  appearance  of  a  $BREAK  control 
card  will  cause  a  standard  column-binary  transition  card  to  be  generated. 

The  core-loads,  followed  by  their  transition  cards,  are  thus  on 
the  execution  tape  when  the  Loader  is  called  in  by  the  Monitor.   The  Loader 
then  reads  the  Program  cards  and  Instruction  cards  from  the  execution  tape, 
and  loads  the  first  program  into  core,  relocating  it  and  any  necessary 
subroutines.   After  loading  has  been  completed,  the  Loader  writes  the 
contents  of  core  from  (MAIN)  to  (PROG)  onto  the  Ping-Pong  tape  as  a  standard 
system  record  (see  section  3»2.4.10»).   The  tape  onto  which  the  core-load 
is  to  be  written  (the  Ping-Pong  tape)  may  be  specified  by  the  use  of  the 
$BREAK  control  card  (see  section  i|.2.2.3.^). 

The  Loader  then  repeats  this  process  for  each  core-load  on  the 
execution  tape.   After  all  core-loads  have  been  processed^  the  Loader  writes 
an  End-of-Tape  record  (see  section  3«2.4.1C4)  on  each  Ping-Pong  tape.   If 
the  last  program  in  a  Ping-Pong  package  is  followed  by  a  $  DATA  control 
card  (rather  than  a  $  BREAK  control  card  or  a  binary  transition  card),  then 
the  last  program  will  not  be  written  on  tape,  but  will  be  executed  first. 
Otherwise,  the  first  program  to  be  executed  will  be  the  one  which  appeared 
first  in  the  job  deck. 

To  call  successive  core-loads  into  core  for  execution,  the  user 
may  use  the  library  subroutines  SEQPGM  and  SELPGM,  which  are  described  in 
section  5- 

Further  details  of  this  flexible  and  powerful  technique  may  be 
found  in  section  3.2.^. 9.^,. where  the  complete  description  of  the  binary 
transition  card  is  given. 

3.2,k.Qf   Relocation  of  Programs 

The  key  address  for  relocation  purposes  is  the  Program  Break.  This 

address  is  computed  as  the  total  number  of  words  in  a  Program,  including 

temporary  storage  other  than  Erasable  Storage.   The  Program  Break  is 

specified  on  the  program  card  (see  section  3-2.U.9-2.) 
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Location  references  in  a  routine  are  relocated  by  the  Loader  either 
as  low  core  or  high  core  (Erasable  storage)  locations.   Relocation  as  a 
low  core  location  means  incrementing  by  the  current  loader  increment,  which 
is  initially  set  by  the  system  and  is  augmented  by  the  length  of  each  program 
after  it  has  been  loaded.   Relocation  as  a  high  core  location  means 
decrementing  by  the  current  loader  decrement.   The  amount  of  relocation  of 
the  first  program  loaded  is  a  system  parameter  (presently  lOOOOn),  and  is 
subject  to  change  at  any  time;  therefore  no  programmer  should  base  anything 
on  this  particular  parameter.   The  high  core  decrement  of  the  Loader  is  currently 
zero. 

The  Program  BreaJc  is  one  of  the  two  quantities  which  determine  how 
a  particular  location  reference  is  to  be  handled  by  the  Loader.   However, 
location  references  which  are  numerically  less  than  the  Program  Break  are 
not  necessarily  relocated  as  low  core  locations,  nor  are  location  references 
which  are  equal  to  or  greater  than  the  Program  Break  necessarily  relocated 
as  high  core  locations.   Each  relocatable  binary  card  carries  its  own 
information  as  to  how  its  instructions  are  to  be  relocated.   Thj.s 
information  appears  in  the  form  of  relocation  bits.   The  relocation  bits 
are  interpreted  one  at  a  time  and  are  related  to  the  decrement  field  of  the 
first  word  to  be  loaded,  the  address  of  that  word,  the  decrement  of  the 
next  word,  etc.   The  relocation  bits  have  the  following  significance: 

0  =  Do  not  relocate  this  (decrement  or  address)  field. 

10  =  If  the  number  in  this  field  is  equal  to  or  greater  than  the  Program 

Break,  relocate  as  a  high  core  location.   If  it  is  less  than  the  Program 
Break,  relocate  as  a  low  core  location. 

11  =  If  the  number  in  this  field  is  equal  to  or  greater  than  the  Program 

Break,  relocate  as  a  low  core  location.   If  it  is  less  than  the  Program 
Break,  relocate  as  a  high  core  location.   This  is  not  used  very  often 
(in  fact,  it  is  never  used  by  MAX)). 

The  Loader  therefore  knows  whether  to  relocate  the  address  and 
decrement  fields  of  each  instruction  as  it  reads  each  relocatable  instruction 
card  of  a  program.   The  details  of  the  relocatable  instruction  card  are 
described  in  section  3»2.U.9.3' 


Datet 

3.2.4. 

Section: 

Page: 

10 

Change : 

Because  certain  of  the  double -precis ion  floating-point  instructions 
on  the  709^+  require  that  the  address  of  the  instruction  refer  to  a  location 
in  core  which  is  an  even  number,   the  Loader  can  provide  for  the  loading  of 
a  program  such  that  a  desired  location  has  an  even  address.   The  EVEN 
pseudo-operation  in  SCATRE  causes  the  instruction  following  to  be  placed  in 
an  even  location  with  respect  to  the  first  instruction  of  the  program,  and 
an  indication  to  be  given  to  the  Loader  that  even  loading  is  desired.   Since 
the  number  of  entries  in  the  program's  Transfer  Vector  may  be  even  or  odd, 
the  Loader  must  determine  whether  a  location  is  to  be  skipped  so  that  the 
first  instruction  of  the  program  will  appear  in  an  even  location.   The  user 
will  therefore  occasionally  find  on  the  Loader  Map  that  a  location  has  been 
skipped  between  parts  of  his  program  in  order  to  assure  the  correct  loading 
of  a  part  which  requires  even  locations. 

3.2.U.9,  Column  Binary  Card  Formats 

3. 2. U. 9.1,  General 

Since  only  column-binary  cards  (as  opposed  to  row-binary  cards) 
are  acceptable  to  the  PORTHOS  system,  these  are  the  only  cards  described  here. 

Column  binary  cards  are  punched  in  binary  in  a  vertical  arrangement 
on  the  card  with  the  sign  position  occupying  the  +  row  of  the  first  of  the 
three  columns  representing  a  word.   Succeeding  bits  are  located,  in  sequence, 
in  rows  -  through  9  of  the  same  column,  rows  +  through  9  of  the  next  column 
and  similarly  for  the  last  of  the  three  columns.   For  example,  bit   s  of 
the  fifth  word  on  a  card  will  be  in  the  +  row  of  column  I3,  and  bit  35 
of  the  fifth  word  in  the  9  row  of  column  15 •   Columns  73  through  80  contain 
the  card  identification. 

Column  binary  cards  are  identified  by  the  presence  of  7  and  9 
punches  in  column  1.   If  both  of  these  punches  are  not  present,  the  card  will 
not  be  treated  as  column  binary. 
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3. 2. U. 9.2,  Program  Card 

In  order  to  convey  information  to  the  Loader  concerning  the  length 
of  Program  Common,  the  Transfer  Vector,  and  Erasable,  etc.,  the  first  card  of 
a  binary  deck  is  normally  the  Program  card.   The  program  card  is  always^  present 
for  relocatable  programs,  and  may  or  may  not  be  present  for  absolute  assemblies. 
The  format  of  a  Program  card  is  described  below. 


Word 

Card 

Row  or 

Contents 

Column 

Rows 

1 

1 

+ 

Must  be 

1 
1 


[ 


1 

1-6  and  8 

1 

7  and  9 

2 

+  through  3 

h   through  9 

3 

■  -  - 

'7 

■-  ■'  ■ 

A 

6  J 

7  ■ 

+  through  0 

71   ■ 

1  through  9 
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+  through  3 


Must  be  punched;  this  identifies 

the  card  as  a  Program  card. 

Blank 

If  punched,  the  check  sura  will 

be  ignored  when  the  card  is  read. 

Blank 

Must  be  punched  to  identify  the 

card  as  column  binary. 

Count  of  words  on  the  card,  not 

including  the  first  two  words. 

Blank 

Blank 

Check  sum  (ACL)  of  all  the  words 

on  the  card  except  the  checksum 

itself. 

Blank 

Contain  the  number  of  entries  in 

the  program's  Transfer  Vector. 

This  will  be  zero  if  there  are  no 

entries  in  the  Transfer  Vector. 

If  it  is  not  zero,  then  the  first 

element  of  the  Transfer  Vector 

list  will  appear  in  word  3  of  the 

card  following  the  program  card  if 

the  mode  of  assembly  is  absolute, 

or  in  word  5  if  the  mode  of  assembly 

is  relocatable. 


¥ord 
3 


Card 
Column 


11 


Row  or 

Rows 

k 

through 

6 

7 

through 

9 

+ 

through 

9 

+  through  0 
1  through  9 
+  through  3 


k   through  6 


7  through  9 
+  through  9 


Contents 

Blank. 

Contains  a  number  equal  to  the 

length  of  the  program;  this  is 

the  program  break.   It  is  equal 

to  1  plus  the  address  of  the  last 

word  of  the  program,  excluding 

Erasable  storage.   All  location 

references  in  the  address  or 

decrement  fields  of  instructions 

being  loaded  are  relocated  or  not, 

depending  on  whether  they  are  below 

the  program  break  or  not  and  on 

the  associated  relocation  bits. 

The  current  loader  increment 

is  augmented  by  this  number  when 

a  subsequent  Program  card  is  read. 

Blank 

The  location  of  the  first  element 

of  the  Transfer  Vector.   This  is 

zero  in  all  subroutines  and  in  all 

main  programs  which  do  not  use 

Program  Common  storage. 

Blank  if  the  pseudo-operation 

EVEN  does  not  appear  in  the  program. 

If  EVEN  does  appear,  row  k   is 

punched. 

Contains  the  lowest  address  used 

in  Erasable  storage.   It  is  set 

equal  to  zero  if  no  Erasable 

storage  is  used. 
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Word 


Card 
Column 


Row  or 
Rows 


all  following 
odd-numbered 
words :  7^  9* • • 


all  following 
even-numbered 
words :  8^10, . . 


L   2nd  ) 
3rd  J 


+  through  9 
+  through  6 
7  through  9 
+  through  9 


+  through  9 
+  through  6 
7  through  9 
+  through  9 


73-t 


Contents 

If  the  program  is  a  main  program 
this  word  is  zero.   If  the  program 
is  a  subroutine  this  word  contains 
the  BCD  symbol  designated  as  the 
primary  entry  point  by  the  ENTRY 
pseudo-op.   The  symbol  is  left 
justified  and  filled  in  on  the 
right  with  BCD  blanks. 
Blank 

The  address  of  the  primary  entry 
point  (the  symbol  in  the 
preceding  word). 
If  there  has  appeared  more  than 
one  symbol  associated  with  an 
ENTRY  pseudo-op,  the  BCD  repre- 
sentation of  these  additional 
symbols  appear  in  these  words, 
left-justified  with  BCD  blanks 
filled  in  on  the  right. 
Blank 


Blank. 

The  address  in  the  program  of 
the  entry  whose  name  is  in  the 
preceding  even-numbered  word. 
Card  Identification. 
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3.2.U.9'3#  Relocatable  Instruction  Card 

Since  the  first  two  words  of  a  binary  card  contain  control  information 
and  a  check  sum,  the  third  and  fourth  words  are  chosen  to  contain  the  relocation 
information.   The  remaining  20  words  contain  the  actual  instructions.   These 
20  instructions  may  require  from  kO   to  80  bits  to  describe  the  relocation, 
depending  on  whether  both  fields  of  each  instruction  are  absolute  or  whether 
both  fields  of  each  instruction  are  relocatable.   Since  only  72  bits  are  available 
in  the  third  and  fourth  words,  in  the  latter  instance  only  l8  instruction  words 
would  appear  on  the  card.   The  corresponding  relocation  bits  can  be  located  only 
by  inspecting  all  relocation  bits  in  sequence,  beginning  with  those  corresponding 
to  the  first  instruction  on  the  card  until  the  desired  ones  are  reached. 

The  format  of  the  information  on  a  relocatable  instruction  card  is 
described  below. 


Word 


Card 
Column 


Row  or 
Rows 


Contents 


1 

1 


+•; 


1 
1 

2 
2 


0 

1-6  and  8 
7  and  9 


-  through  3 
k   through  6 


7  through  9 
+  through  9 


Must  be  blank. 

Must  be  punched;  this  punch 

identifies  the  card  as  an 

instruction  card. 

If  punched,  the  check  sum  will  be 

ignored  when  the  card  is  read. 

Blank. 

Must  be  punched  to  identify  the 

card  as  column  binary. 

Blank. 

The  number  of  words  to  be  loaded 

into  core  from  this  card. 

001  if  the  loading  address  is 

absolute  (this  is  used  only  for 

presetting  PROGRAM  COMMON). 

The  location  into  which  the  first 

word  of  the  card  is  to  be  loaded 

(the  Loader  adds  the  current  in- 

crement  to  relocate  the  words). 
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Word 

Card 

Column 

2 

{'1 

4 

h) 

3 

7,-8,9 

k 

10,11^2 

5 -2k 

13-72 

73-80 

Row  or 
Rows 


Contents 

Check   Slim  (ACL)   of  all  the  words 

on  the   card  except  the   check 

sum  itself. 

First  word  of  relocation  bits 

for  instructions  on  this  card. 

Second  word  of  relocation  bits. 

Instructions  or  data  to  be  loaded. 
Card  Identification. 


3.2.^.9'^»  Binary  Transition  Card 

The  Binary  Transition  Card  is  used  only  for  Ping-Pong  jobs,  and 
conveys  information  to  the  Loader  regarding  the  tapes  to  be  used  for  input 
and  output. 

The  format  of  a  Binary  Transition  Card  is  as  follows: 


Card 
Column 


2-5 

6 

7.8 
9 

10,11 

12 
13-72 
73-80 


Row  or 
Rows 

+,1,    and  9 


Contents 

The  7  and  9  punches  identify  the 
card  as  column  binary. 

Blank 

A  BCD  number  N  (see  below) 

Blank 

A  BCD  number  M  (see  below) 

Blank 

A  BCD  number  P  (see  below) 

Blank 

Card  Identification 
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The  number  N  is  the  logical  tape  number  of  the  tape  on  which  the 
Ping-Pong  program  is  to  be  written;  and  may  be  one  of  2.,  h ,    or  9,  or  may 
be  blank. 

The  number  M  is  the  logical  tape  number  of  the  tape  from  which  loading 
is  to  take  place.   The  logical  tape  number  M  must  be  different  from  W,  and  M 
may  be  one  of  2.,    3^  ^j>  l,    or  ^,    or  may  be  blank. 

The  number  P  is  optional;  when  it  is  used,  it  may  be  used  only  in 
conjunction  with  the  number  N  in  column  6,  and  may  be  only  a  1  or  a  2.   If 
P  is  not  used,  P  is  left  blank. 

When  the  Loader  detects  a  logical  tape  number  N   in  column  6,  it 
writes  the  current  contents  of  core  as  a  record  on  tape  W  and  proceeds  to 
.  ead  another  binary  card  image  from  the  tape  from  which  it  is  currently 
loading.   This  is  ordinarily  logical  tape  3^  the  execution  tape,  but  may  be 
a  logical  tape  number  M  designated  by  the  user;  when  the  Loader  detects 
a  logical  tape  ni:imber  M  in  column  9?  it  continues  reading  and  relocating 
(into  core)  instructions  from  relocatable  binary  card  images  on  tape  M. 
Reading  and  relocating  from  tape  3  or  tape  M  continues  until  an  End-of-File 
mark  is  encountered  on  one  of  those  tapes.   All  loading  is  then  terminated 
and  execution  will  begin. 

The  treatment  by  the  Loader  of  the  numbers  N  and  M  in  columns  6 
and  9  of  the  Transition  Card  is  as  follows: 

1)  if  columns  6  and  9  ^•I'e  both  blank,  the  current  core  contents  are 
written  on  logical  tape  2  and  loading  of  another  core-load  will 
continue  (from  tape  3  or  a  previous  tape  M); 

2)  if  column  6  is  blank  and  column  9  is  non-blank,  loading  into  core 
continues  from  tape  M  (as  specified  in  column  9),  and  no  core-load 

is  written  on  tape  2; 

3)  if  column  6  is  non-blank  and  column  9  is  blank,  the  current  core 
contents  will  be  written  on  tape  N  (as  specified  in  column  6)  and 
loading  of  another  core-load  will  continue  (from  tape  3  or  a  previous 
tape  M); 
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U)  if  columns  6  and  9  are  both  non-blank,  the  current  core  contents 
will  be  written  on  tape  N  (as  specified  in  column  6),  and  loading  of 
another  core-load  will  continue  from  the  tape  M  designated  in  column  9. 

The  number  P  which  appears  in  column  12  of  the  Transition  Card  may 
be  used  to  add  Ping-Pong  records  to  a  tape  which  already  contains  a  number 
of  records.     When  the  Loader  detects  a  "l"  in  column  12,  it  searches  for 
and  End-of-Tape  record  (see  section  3-2.i+.10,)  on  the  tape  specified  in  column  6 
and  replaces  it  by  the  current  contents  of  core.   Thus  the  user  may  have  a 
reserved  (and  previously  generated)  ping-pong  tape  mounted  for  his  job  and  add 
a  core-load  to  it.   When  the  Loader  detects  a  "2"  in  column  12,  it  searches 
for  an  End-of-Tape  record  (see  section  3«2.U.10i)  on  the  tape  specified  in  column  6 
and  replaces  the  core-load  before  it  by  the  current  core  contents,  deleting 
the  End-of-Tape  record. 

3.2. ^.10#  Standard  System  Records 

In  order  to  simplify  the  reading  of  programs  from  tape  into  core  for 
execution,  a  standard  format  for  the  organization  of  these  programs  on  tape 

has  been  established.   The  program  to  be  read  into  core  is  preceded  on  tape  by 
a  loading  block,  which  contains  the  information  necessary  for  the  proper  reading 
and  storing  of  the  program. 

The  loading  block  for  a  Ping-Pong  record  has  the  format  shown  below 
(written  in  SCATHE  notation). 

Word  Contents 

1  PZE    rDENT,,CC 

2  TTR    ENTRY  .  . 

3  Check  sum 

k  SVTJ    L0ERAS,D,PGMBRK 

5  I0RT   FSTL0C,,N 

Word  1  contains  the  record  identification  number  IDENT  in  the  address 
field;  the  records  are  numbered  in  sequence,  starting  with  1  for  the  first  core- 
load,  2  for  the  second,  etc.   The  record  identification  number  for  an  End-of-Tape 
record  is  32767   ,  or  77777o-   The  nxxmber  CC  indicates  the  number  of  Data  Channel 
Commands  which  will  be  required  to  load  the  record;  for  Ping-Pong  records, 
this  number  will  always  be  1. 
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Word  2  contains  the  location  in  core  (ENTRY)  to  which  control  is 
to  be  transferred  after  loading  is  complete. 

Word  3  is  a  check  sum  of  all  the  words  in  the  record,  including 
the  loading  block,  but  excluding  the  check  sum  word  itself. 

Word  h   is  the  dump  flag  word  for  this  core-load  and  indicates  which 
portions  of  core  and  to  be  dumped  if  execution  of  the  core-load  should  be 
terminated  by  a  transfer  to  the  System  Error  exit  SYSERR.   The  prefix  SVN 
indicates  that  the  word  is  a  dump  flag  word;  L0ERAS  is  the  lowest  location 
assigned  to  Erasable  storage;  PGMBRK  is  the  highest  location  of  the  user's 
program  to  be  dumped;  and  the  quantity  D  indicates  the  type  of  dump  desired. 

If  D  =  1,  a  $  l/p   DUMP  card  was  in  the  job  deck; 

if  D  =  2,  a  $  LIBDUMP  card  was  in  the  job  deck; 

if  D  =  4,  a  $  DUMP  card  was  in  the  job  deck;  and 

if  D  =  6,  A  $  FULL  DUMP  card  was  in  the  job  deck, 
and  the  problem  specification  number  has  FULL  DUMP  permission. 

Word  5  is  the  Data  Channel  command  used  to  read  the  Ping-Pong 
program  into  core.   The  first  word  of  the  program  follows  immediately  after 
word  5  on  tape,  and  is  loaded  into  location  FSTL0C.   The  number  N  is  the 
number  of  words  in  the  core-load. 
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3.2.5*  Low  Core  System  Control 
3.2.5.1*  Introduction 

The  more  uniform  and  integrated  the  several  pieces  of  an  operating 
system  are,  the  smoother  and  more  efficient  is  its  handling  of  job.   In 
particular,  on  a  machine  with  the  multiplicity  of  hardware  interrupts  avail- 
able on  a  709^,  it  is  almost  mandatory  that  l)  one  program  be  responsible 
for  supervising  the  interrupt  features  and  keeping  them  from  interfering 
with  one  another,  or  2)  the  interrupts  be  turned  off  so  they  cannot  interact 
and  cause  trouble.  Although  instances  of  the  latter  approach  are  found  all 
too  often,  such  an  approach  does  not  exploit  the  full  capabilities  of  the 
equipment.   Therefore,  a  set  of  communicating  trap  processors  is  the  founda- 
tion of  any  modern  operating  system  for  the  709^- 

The  second  level  at  which  uniformity  can  be  achieved  is  the  interface 
between  the  trap  processors  and  the  outer  world.   The  direct  use  of  a  trap 
processor  is  necessarily  tedious  and  detailed  because  of  its  dependence  on 
hardware  design.   It  is  difficult  to  expect  the  average  programmer  to  write 
such  programs,  A  set  of  routines  which  will  first  set  up  conditions  which 
will  result  in  a  trap,  and  then  communicate  necessary  information  in  a 
convenient  form  to  the  calling  program  when  a  trap  occurs,  will  allow  a  few 
simple  subroutine  calls  to  replace  the  complex  trap  processor  programming. 
The  most  frequent  use  of  such  routines  is  in  input/output  control.   By 
having  all  system  components  use  one  set  of  common  routines  for  initializing 
l/O  channel  activity,  the  individual  components  need  not  concern  themselves 
with  conflicting  selects,  losing  trap  conditions,  etc.   Also,  this  permits 
centralized  tape  assignments.   Thus,  it  is  not  necessary  to  change  coding  in 
every  system  program  every  time  the  machine  configuration  or  use  of  existing 
equipment  is  altered. 

The  third  (and  usually  highest)  level  at  which  common  routines  can 
exist  is  in  the  performance  of  frequently  occurring  utility  tasks  necessary 
or  useful  to  many  parts  of  the  system.   An  example  of  this  arises  from  the 
desirability  of  buffering  heavily  used  tapes,  such  as  the  peripheral  input 
and  output  tapes.   When  a  common  routine  is  used  by  the  entire  system  to 
read  the  input  tape,  for  example,  there  is  only  one  routine  to  be  changed 
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vhen  improvements  and/or  corrections  are  to  "be  made.   Each  system  component 
is  thus  relieved  of  the  problem  of  buffering  tapes  itself,  which  should  not 
be  forced  on  a  routine  whose  primary  task  is  something  else,  e.g.,  translation. 
In  the  specific  instance  cited,  there  results  complete  freedom  to  change  the 
interface  between  the  709^  and  the  peripheral  equipment  (e.g.,  tape  or  disk, 
blocked  or  unblocked  records,  etc.)  which  is  undesirable  if  compatibility  with 
each  individual  system  component  (or  even  worse,  each  job  I)  must  be  reviewed 
any  time  such  changes  are  contemplated. 

Another  part  of  this  third  level  is  the  communication  between  system 
components  which,  for  various  reasons,  cannot  simultaneously  occupy  core  storage. 
An  example  of  such  a  communication  is  that  which  locates  the  Monitor  and  gives 
control  to  it  after  translation  or  after  execution.   Another  is  the  common 
loading  routine  for  system  records  which  is  used  to  access  various  parts  of  the 
system  as  well  as  core  loads  in  Ping-Pong  jobs. 

This  section  consists  of  several  parts.   First,  the  general  structure 
of  hardware  interrupts,  or  traps,  on  the  709^+  is  discussed,  along  with  the 
terms  and  comments  referred  to  elsewhere  in  the  section.   Then  the  different 
sets  of  hardware  units  and  their  associated  traps  are  discussed,  together  with 
the  first  and  second  level  programming  involved.   Then  the  third  level  programs 
are  discussed, 

3.2. 5. 2,  Machine  Terminology 

In  the  following  discussions  various  parts  and  features  of  the  709^ 
will  be  mentioned.   It  is  convenient  to  define  some  terms  and  concepts  here. 
First,  the  central  processing  unit  (CPU),  consisting  of  logical  control  and 
arithmetic  control,  is  that  part  of  the  machine  which  is  generally  considered  to 
be  "the  computer."   It  contains  the  accumulator  (AC),  multiplier-quotient 
register  (MQ),  storage  register  (SR),  instruction  location  counter  (ILC),  adder, 
operation  decoders,  etc.   The  CPU  is  also  often  referred  to  as  the  "main  frame." 
Second,  there  is  the  core  storage.   Third,  there  are  input/output  channels, 
often  referred  to  simply  as  "channels."   Fourth,  there  is  the  multiplexor, 
which  polices  the  access  of  all  other  parts  of  the  computer  to  the  core  storage 
unit. 

Some  of  the  traps  to  be  discussed  below  cannot  be  controlled  or 
inhibited.   Others  are  under  the  control  of  mask  registers.   The  mask  register 
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concept  will  be  discussed  here.   When  a  condition  requesting  a  trap  occurs, 
it  sets  a  trigger  (or  flip-flop  or  switch)  to  the  "on"  or  "1"  status.  A 
mask  register  is  a  set  of  similar  triggers,  each  associated  with  a  given 
trap-causing  condition.   The  mask  register  combines  triggers  for  related 
trap  conditions  for  ease  of  program  control.   Whenever  the  trigger  in  a 
mask  register  for  a  given  condition  is  set  to  1,  that  condition  is  said  to 
be  enabled.   This  term  is  used  because  the  logical  "and"  of  the  trigger  set 
by  the  condition  and  the  associated  trigger  in  the  mask  register  must  be  1 
before  a  trap  is  allowed  to  occur.   Thus,  a  condition  is  enabled  when  its  mask 
register  bit  is  1  because  the  occurrence  of  the  corresponding  condition  can 
cause  a  trap.   If  the  condition  trigger  is  on,  but  the  corresponding  mask 
register  trigger  is  off  so  that  a  trap  cannot  occur,  the  trap  is  said  to  be 
"delayed",  "hanging",  or  "waiting".   If  during  such  a  time  the  condition 
trigger  is  turned  off,  either  purposely  or  accidentally,  the  trap  is  said  to 
be  "lost". 

There  is  also  on  the  709^  a-  general  trap  trigger  which  governs 
whether  or  not  the  CPU  can  be  interrupted  by  most  execute  traps  (see  des- 
cription below).   This  trigger  can  be  turned  on  under  program  control,  but 
cannot  be  turned  off  by  program  as  is  possible  on  the  70^0/4ij-.   it  is  turned 
off,  however,  by  an  execute  trap.   This  effectively  inhibits  any  other  traps  until 
such  time  as  it  is  turned  on  by  the  program.   This  allows  a  trap  program  a 
"breather"  to  decide  what  to  do  before  allowing  additional  traps  to  occur.   Since 
there  are  execute  traps  which  do  not  have  mask  registers  that  allow  them  to  be 
delayed  under  program  control,  it  is  the  usual  practice  for  trap  programs  to 
immediately  load  all  mask  registers  with  zeros  and  turn  on  the  general  triggers 
to  permit  such  traps  to  occur  (e.g.,  the  clock  trap).   It  is  then  the  responsi- 
bility of  the  trap  programs  which  handle  these  non-delayable  traps  to  see  that 
other  trap  programs  which  may  have  been  themsel^s  trapped  are  not  disturbed  by 
this  procedure. 

3.2.5.3*  Description  of  the  Standard  709I+  Trap 

Whenever  a  trap  occurs  on  the  709^>  the  following  sequence  of  events 
occurs.   First,  the  instruction  location  counter  is  stored  in  a  fixed  location. 
Second,  either  a  transfer  is  made  to  a  second  fixed  location,  or  the  instruction 
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in  a  second  fixed  location  is  executed.   In  addition,  many  traps  store 
status  information  in  the  decrement  of  the  first  of  these  two  fixed  locations. 
Traps  which  alter  program  control  via  a  transfer  are  called  transfer  traps, 
and  historically  are  usually  those  which  were  available  on  the  70^-   The 
remaining  (and  more  numerous)  traps  are  called  execute  traps,  and  were  intro- 
duced on  the  709/7090  together  with  the  XEC  circuitry.   In  this  write-up  the 
location  in  which  the  ILC  and  possible  status  information  is  stored  will  be 
called  a  flag  cell,  and  the  location  to  which  a  transfer  is  made,  or  which 
is  executed,  will  be  called  a  trap  cell.   The  transfer  traps  all  use  location 
OOOOOp  as  their  flag  cell  but  have  distinct  trap  cells. 

To  be  effective,  the  trap  cell  of  an  execute  trap  must  contain  an 
unconditional  transfer  or  a  conditional  transfer  whose  condition  is  satisfied. 
Otherwise,  executing  the  instruction  in  the  trap  cell  will  not  alter  the  ILC, 
which  is  the  desired  effect.   Usually  a  TTR  instruction  is  used  in  a  trap  cell. 

With  one  exception,  no  trap  (not  even  a  floating  point  trap)  ever 
occurs  until  the  end  of  an  operation.   This  simplifies  the  problem  of  saving 
and  restoring  the  status  of  the  machine,  which  will  be  discussed  later.  Thus, 
the  ILC  contains  the  address  of  the  next  instruction  to  be  executed.   This  is 
most  often  the  instruction  following  the  one  at  the  end  of  which  the  main  frame 
accepted  the  trap.   If  the  last  instruction  executed  was  a  successful  transfer, 
however,  the  ILC  contains  the  location  to  which  the  transfer  was  made.   Thus, 
one  can  always  return  to  the  interrupted  program  by  transferring  to  the  address 
given  in  the  flag  cell. 

The  one  exception  to  the  above  rule  is  the  trap  of  a  successful 
transfer  instruction  when  transfer  trap  mode  is  on.   Since  the  successful 
transfer  condition  inhibited  the  normal  advance  of  the  ILC  by  one,  and  since 
the  transfer  itself  was  inhibited  by  the  transfer  trap  mode,  the  ILC  still 
contains  the  address  of  the  instruction  which  generated  the  trap.   This  is 
convenient,  since  one  normally  interprets  the  transfer  which  trapped,  or,  if 
trapping  mode  is  turned  off  and  control  returned  to  the  interrupted  sequence, 
the  transfer  instruction  that  was  trapped  should  be  executed  again. 

In  many  cases,  the  condition  causing  the  trap  is  considered  by  the 
system  to  be  fatal  to  execution.   In  this  case  a  comment  is  printed  indicating 
thp  paiisp  nf   jnh  t.p-rminat.inri^,  and  With  it  an  address.   In  the  case  of  traps 
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which  were  generated  by  the  last  instruction  executed  (e.g.,  floating  point 
traps) J  what  one  wants  is  the  address  of  the  last  instruction  executed. 
Therefore,  the  address  printed  is  the  address  stored  in  the  flag  cell  less 
one . 

3.2.5A,  Machine  Status  and  Trap  Progratmning 

A  trap  may  occur  between  any  two  instructions (with  certain  excep- 
tions which  are  not  discussed  here).   In  particular,  it  can  occur  in  the 
middle  of  an  arithmetic  computation.   Therefore,  the  program  which  receives 
control  from  the  trap  cell  must  save  the  contents  of  any  machine  register 
which  it  will  use  or  which  will  be  used  by  subroutines  on  which  it  calls. 
The  machine  registers  (and  two  conditions  are  divided  into  three  classes 
here  for  the  sake  of  easy  reference  later. 

Class  1  Class  2  Class  3 

Index  Registers     AC  Sense  Lights 

-r  H  ■   j_       ,,^  Divide  Check  Light 

Sense  Indicators    MQ  ..^  ^    „^    t  •  ^j. 

MQ  Overflow  Light  . 

AC  Overflow  Light      l/O  Check  Light 

Floating  Point  Trap  on  or  off 

Multiple  Tag  Mode  on  or  off 

Class  1  contains  the  registers  which  are  normally  preserved  by  subroutines. 

Class  2  adds  the  registers  most  likely  to  be  used  by  any  trap  processing  program. 

Class  3  add  virtually  all  the  important  remaining  registers  and  lights  on  the 

machine . 

Most  trap  processors  never  touch,  and  therefore  need  not  save.  Class  3 
registers,  since  even  l/O  can  be  accomplished  without  them.   From  this  point  on 
the  terms  machine  conditions  or  machine  status  will  refer  to  the  combination  of 
Class  1  and  Class  2  unless  otherwise  stated. 

The  general  flow  in  a  trap  processor,  then,  is:   l)  save  machine  con- 
ditions, 2)  process  the  trap,  3)  restore  machine  conditions,  and  h)   return  to 
trapped  program.   In  the  case  of  a  condition  which  is  considered  fatal,  step  k, 
and  often  step  3^  is  skipped. 

3.2.5.5,  Core  Storage  Clock 

3.2.5- 5>1«  Description  of  Equipment 
Sixty  times  every  second,  keyed  to  the  power  line  frequency  as  an 
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electric  clock  is,  the  main  frame  program  is  suspended  between  instructions 
for  two  machine  cycles.   During  these  two  cycles  positions  1-35  of  core 
storage  location  5  are  sent  to  adders  1-35^  an  internally  generated  1  is 
added,  and  adders  P,  1-35  are  returned  to  positions  S,  1-35  of  location  5- 
If,  when  the  1  is  added,  an  arithmetic  overflow  occurs,  a  standard  hardware  trap 
occurs  if  the  trap  is  enabled.   The  accumulator  overflow  light  is  not  turned  on. 

The  incrementation  of  location  5  occurs  whenever  power  is  supplied 
to  the  709^  and  a  manual  clock  switch  is  on,  whether  the  machine  is  in  auto- 
matic or  manual  status.  An  overflow  occurring  while  the  machine  is  in  manual 
status  causes  a  trap  which  is  remembered  and  is  effective  as  soon  as 
automatic  status  is  resumed. 

3.2.5.6-  Input /Output  Programming 

3. 2. 5. 6. Iff  Description  of  Equipment 

Input  and  output  on  the  709^  is  done  by  means  of  special  purpose 
stored  program  devices  known  as  data  channels.   There  are  two  general  classes 
of  channels.   Only  the  'jGO'J,   which  is  used  to  operate  card  readers,  printers, 
punches,  and  729  tape  drives  will  be  discussed  here.  A  more  sophisticated 
channel,  the  7909;  is  used  to  operate  I3OI  disk  files,  73^0  hj-pertapes,  and 
1^11^1  synchronizers  for  remote  and  specialized  l/O  devices. 

The  7607  channel  executes  a  program  from  locations  in  core  storage, 
just  as  the  CPU  does.   There  is  a  location  register,  corresponding  to  the 
instruction  location  counter  in  the  CPU,  which  normally  advances  by  1  after 
the  decoding  of  every  channel  command  (another  name  for  an  instruction, 
which  will  be  used  to  keep  references  straight  when  discussing  CPU  and 
channels ) . 

3.2.5.6.2  <.  Main  Frame  Instructions 

There  are  three  main  classes  of  CPU  instruction  involved  in  the 
use  of  data  channels.   One  is  the  class  of  select  instructions.   These  cause 
the  channel  to  send  the  necessary  control  signals  to  prepare  an  l/o  unit  for 
use,  and  to  ready  those  circuits  which  will  be  used  during  channel  operations 
(e.g.,  read  or  write  circuits).   The  second  class  is  comprised  of  two  instruc- 
tions, the  load  channel  (LCH)  and  reset  and  load  channel  (RCH) .   Both  of  these 
cause  the  channel  to  begin  executing  a  channel  program  with  the  location  given 
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in  the  instruction.   The  LCH  waits  until  the  channel  sends  a  signal  indi- 
cating its  readiness  to  accept  a  new  program.   The  RCH  causes  the  channel 
program  in  progress,  if  any,  to  be  stopped,  and  the  new  program  to  he 
begun  immediately.   Thus,  a  common  select  sequence  is,  for  example: 

RTBX   3 

RCHX   PGM 


PGM     lORT   CARD,, 2 8 
The  third  class  is  composed  of  instruction  used  to  determine  the 
status  of  channel  activity.   Among  these  are  TCO,  TCN,  TRC,  TEF,  BTT,  ETT. 
Also,  there  is  the  store  channel  instruction  (SCH)  which  places  the  current 
contents  of  various  channel  registers  into  a  storage  location  so  they  may  be 
examined  by  the  CPU  program.   See  the  709^  Reference  Manual  for  detailed 
descriptions  of  these  instructions. 

3.2.5.6.3»  Channel  Commands 

All  channel  commands  have  the  general  form  of  a  class  of  CPU 
instructions  called  type  A  main  frame  instructions,  in  which  the  operation 
code  is  contained  in  the  prefix,  an  address  is  specified  in  bits  21-35^ 
and  a  word  count  occupies  bits  3-17 <•   Each  command  causes  the  transmission 
through  the  channel  of  n  words  of  information,  starting  with  the  location 
specified  in  the  address,  and  continuing  to  transmit  in  the  direction  of 
increasing  addresses.   (This  is  often  referred  to  as  "forward  in  core,"  as 
opposed  to  the  method  in  which  MAD  and  FORTRAN  vectors  are  stored,  which  is 
referred  to  as  "backward  in  core.")  This  transmission  continues  until  the 
condition  specified  by  the  operation  code  is  satisfied.   The  reader  is 
referred  to  the  709^  Reference  Manual  for  details. 

Of  particular  importance  is  the  T-type  command  (for  "transfer" 
or  "trap"),  signified  by  a  1  in  bit  2  of  the  command  which  indicates  the 
end  of  a  channel  program.   When  the  condition  for  such  a  command  is 
satisfied,  a  signal  is  sent  to  the  CPU  to  indicate  the  channel's  readiness 
to  begin  a  new  channel  program.   If  the  CPU  does  not  provide  a  new  program 
(via  an  LCH  instruction)  within  a  certain  time  interval,  a  command  trap  will 
occur  if  the  command  trap  feature  for  the  channel  is  enabled.   This  sets 
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a  status  bit  to  indicate  the  tj^e  of  trap.  Whether  the  trap  is  enabled  or 
not,  the  channel  disconnects  and  is  available  for  further  use.   Since  in 
most  channel  programs  this  condition  occurs  at  an  end-of -record  on  tape,  it 
it  often  referred  to  as  an  EOR  trap.   If  the  command  trap  is  not  enabled,  the 
signal  resulting  from  completion  of  the  T-type  command  remains  until  an  enable 
permits  a  trap  to  occur,  or  until  another  select  is  issued  on  that  channel. 
Unless  this  latter  select  operation  is  given  purposely,  the  trap  signal 
which  was  waiting  will  be  accidentally  lost  before  it  has  been  processed, 
causing  logical  programming  errors  in  l/O.   For  this  reason,  all  programming 
which  makes  use  of  the  channel  traps  requires  a  centralized  set  of  l/O  routines 
to  avoid  such  errors. 

Two  further  comments  about  command  traps  are  in  order.   First,  an 
lOCD  command  may  be  considered  an  lOCT  that  does  not  generate  a  trap  signal. 
Second,  whenver  a  tape  mark  (End-of -File)  is  encountered  while  reading  a  tape, 
the  channel  disconnects  immediately  and  turns  on  the  end-of -file  trigger. 
If  the  command  trap  for  this  channel  is  enabled,  an  interrupt  occurs.   If  it 
is  not  enabled,  the  EOF  trigger  remains  on  until  it  is  turned  off  by  a  TEF 
instruction,  or  until  the  command  trap  for  that  channel  is  enabled  and  an 
interrupt  occurs .   If  the  EOF  trigger  is  not  turned  off  in  one  of  these  ways, 
it  will  remain  on  through  successive  tape  reads  or  writes  and  give  spurious 
end-of -file  conditions. 

3.2. 5. 6 -^^  Parity  Checking  and  Redundancy  on  Tape 
When  709^  words  are  written  on  tape  they  are  written  in  6  bit 
groups  called  "bytes,"  6  bytes  to  the  word.   To  each  byte  a  Y^h  bit  is 
added  so  that  either  the  number  of  I's  in  the  7-ti"t  group  is  odd,  in  which 
case  the  tape  is  said  to  be  ■v/ritten  in  odd  parity  or  binary  mode,  or  it  is 
even,  in  which  case  the  tape  is  said  to  be  written  in  even  parity  or  BCD 
mode.  The  mode  of  tape  reading  or  writing  is  determined  by  the  presence 
or  absence  of  a  bit  in  position  3I  of   the  select  instruction,  1  for  binary, 
0  for  BCD.   BCD  tapes,  in  addition  to  being  written  in  even  parity,  have 
bytes  which  differ  from  the  709O  bit  patterns  as  delivered  to  the  channel. 
This  conversion  is  carried  out  automatically  and  need  not  concern  a  pro- 
grammer, except  that  the  6  bit  configuration  001010  cannot  be  written  and 
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read  from  a  BCD  tape.   The  exact  description  of  this  conversion  will  not  be 
discussed  here,  nor  will  the  reasons  for  its  existence. 

In  addition,  at  the  end  of  every  tape  record  an  extra  byte  is  added 
with  the  necessary  I's  to  msike  the  number  of  bits  in  each  of  the  seven  recording 
tracks  even. 

During  every  tape  read,  or  the  check  read  of  every  tape  write  operation, 
the  parity  of  each  byte  is  compared  vfith  that  specified  by  the  select  instruction. 
If  they  do  not  match,  the  tape  check  trigger  is  turned  on.   This  is  known  as 
lateral  parity  checking.   The  7  tracks  are  also  checked  for  an  even  number  of 
bits,  and  if  this  does  not  occur,  the  same  tape  check  trigger  is  turned 
on.   If  the  redundancy  trap  for  that  channel  is  enabled,  the  channel  disconnects  as 
soon  as  the  trigger  comes  on,  and  a  trap  occurs.   Note  that  all  channel 
transmission  stops  immediately  in  this  case.   If  the  redundancy  trap  is  not 
enabled,  the  channel  program  is  completed,  and  the  tape  check  trigger  remains 
on  until  it  is  turned  off  by  a  TRC  instruction,  or  redundancy  trap  is  enabled 
and  a  trap  occurs.   Note  that  failure  to  turn  off  this  trigger  in  one  of  the 
two  ways  described  above  will  cause  every  succeeding  record  read  or  written 
to  appear  redundant  when  checked. 

3.2. 5-6. 5-   Data  Selects  and  Non-data  Selects 

A  data  select  is  one  which  causes  actual  reading  or  writing,  i.e., 
a  RDS  or  WRS.   A  non-data  select  is  one  which  issues  a  tape  unit  control  not 
involving  data  transmission,  i.e.,  BSR,  BSF,  WEF,  REW.   (See  the  709^ 
Reference  Manual  for  exact  descriptions  and  how  select  instructions  can  be 
stacked.)  Note  that:   l)  data  selects  use  the  channel  throughout  their 
operation,  2)  BSR  and  BSF  use  the  channel  for  only  3  cycles,  but  the  tape 
control  is  in  use  until  the  end  of  the  backspace  (a  TCO  will  not  transfer),  and 
3)  after  a  tape  unit  accepts  a  REW  or  RUN  signal,  both  the  channel  and  the 
tape  control  are  free. 

3.2.5.6.6.   Channel  Trap  Control 

There  is  a  mask  register  for  the  channel  traps  which  is  loaded  from 
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a  storage  location  by  an  enable  (EWB)  instruction.   The  ENB  also  turns  on 
the  main  trap  control  trigger^  in  case  it  has  been  turned  off  by  a  previous 
trap.   The  positions  of  the  mask  register  which  control  the  redundancy  trap 
feature  are  loaded  from  bits  10-17,  those  which  control  the  command  trap 
feature  from  bits  28-35-   Bits  I7  and  35  are  associated  with  channel  A,  bits 
16  and  3^  with  channel  B^  etc. 

Another  instruction,  restore  channel  traps  (RCT),  turns  on  the 
main  trap  control  trigger  without  affecting  any  mask  registers.   Since  there 
can  be  more  than  one  mask  register  on  a  709^  (relocation  registers,  bounds 
registers,  etc.),  this  instruction  name  is  a  misnomer. 

All  the  channel  flag  and  trap  cells  are  located  together  in  a 
block  of  core.   There  are  separate  locations  for  each  channel. 

Channel  Flag  Cell  (octal)         Trap  Cell  (octal) 

A  00012  00013 

B  000li^-  00015 

c  00016  00017 

D  00020  00021 

-     •       E  00022  00025 

F  0002i^■  00027 

G  00026  00031 

H  00030 

When  a  trap  occurs,  the  following  status  bits  are  placed  in  the  decrement 

of  the  flag  cell. 

Bit       Meaning 

15  EOF  command  trap 

16  "  ■  ■   Tape  check 

17  EGR  command  trap  (actually,  end  of  channel  program  trap) 

3.2.5.6.7.  Select  Routines 

There  are  two  select  routines,  one  for  data  selects  (such  as 
SYSRUB),  which  also  prepares  channel  programs  and  trap  exits,  and  one  for 
non-data  selects  (such  as  SYSBSR).   They  will  be  described  as  one  here,  and 
the  extra  features  of  the  data  select  routines  discussed  later. 

Each  entry  point  loads  the  MQ  with  a  basic  select  instruction 
corresponding  to  that  entry,  and  then  a  common  part  of  the  code  is  entered. 
Index  Register  1  (iRl)  is  saved,  and  a  special  subroutine  is  called  which 
determines  the  physical  unit  specified  by  the  logical  tape  number,  checks 
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for  a  valid  logical  tape,  channel,  and  unit  number,  and  then  if  everything 
checks,  forms  the  select  instruction  by  OR ' ing  in  the  channel  and  unit 
numbers.   The  completed  select  instruction  is  left  in  the  logical  AC  on 
return,  and  the  channel  number  (l  for  A,  2  for  B,  etc.)  is  in  IR2.   (lR2 
has  been  saved  in  the  same  word  as  IRl . )   From  this  point  on  all  refer- 
ences to  scratch  areas  or  instructions  which  are  different  for  different 
channels  are  done  by  tagging  such  references  with  IR2. 

Immediately  after  this,  a  call  is  made  to  another  special  routine 
(called  delay).   This  routine  loads  the  word  containing  IRl  and  IR2  into 
the  MQ  register,  turns  on  the  channel  traps,  and  delays  until  the  channel 
is  inactive.   This  assures  that  no  select  will  be  given,  causing  a  possible 
loss  of  trap,  until  the  trap  has  had  a  chance  to  occur.   (A  tape  may  still 
be  in  motion  completing  a  backspace  when  the  channel  becomes  "inactive".) 
Notice  that  all  index  registers  and  the  results  of  the  work  done  so  far  are 
in  the  AC,  MQ,  and  IR's  1,  2  and  U.   Only  the  contents  of  these  registers 
are  necessary  to  proceed  from  this  point,  should  a  channel  trap  occur  while 
in  the  delay  loop.   This  information  will  be  saved  when  a  channel  trap  occurs, 
and  restored  when  a  return  is  made  to  the  interrupted  program.   Thus,  the 
same  routine  may  be  called  from,  say,  an  EOR  trap  exit  program,  and  the 
original  call  will  be  processed  correctly,  so  long  as  the  return  to  the  trap 
processor  is  made  before  another  interrupt  on  the  same  channel  occurs. 

DELAY  does  not  destroy  the  contents  of  the  AC.   After  the  return 
from  DELAY  the  select  instruction,  logical  tape  number,  and  IRU  for  that 
call  are  stored  in  scratch  cells  for  that  channel  for  possible  later  use  by 
the  Channel  Trap  Processor.   The  select  is  given,  and  a  return  is  made  to 
the  calling  program. 

If  the  routine  called  was  a  data  select  routine,  more  processing 
is  required  before  the  select  is  issued  and  the  return  made.   The  specifi- 
cations for  all  the  trap  exits  are  saved  in  scratch  areas  for  the  channel 
specified.   Then  the  channel  program  given  by  the  calling  program  is  checked 
for  proper  formation.   To  relieve  an  otherwise  impossible  task  in  error 
recovery  in  the  Channel  Trap  Processor,  the  restriction  is  made  that  the 
channel  program  given  read  only  one  record  or  write  only  one  record. 
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Because  of  possible  timing  problems  involved,  lOSP  and  lOST  commands  are 

not  allowed.  Also,  since  a  trap  should  tie  generated  to  allow  the  trap 

processor  to  handle  its  share  of  the  bookkeeping,  lOCD's  are  not  permitted. 

Therefore,  an  acceptable  channel  program  is  of  the  form: 

lOCP 
lOCP 

lOCP 
lORT 
or 

lORT 

The  sum  of  the  word  counts  of  the  lOCP's  must  be  less  than  or  equal  to  the 

number  of  words  in  a  record  when  reading.   Otherwise,  the  tape  will  be 

incorrectly  positioned  because  extra  records  will  be  read.   This  is  especially 

important  should  a  tape  check  trap  occur. 

In  addition  to  checking  the  channel  program  for  proper  formation, 
as  many  as  thirty  lOCP's  (with  perhaps  an  lORT)  will  be  moved  to  a  channel 
program  vector  in  low  core  scratch  storage.   During  this  move  TCH's  are 
interpreted  and  are  not  counted.   If  commands  exclusive  of  TCH  have  been 
moved,  and  the  channel  program  has  not  ended  (lORT  not  found),  TCH  is  added 
to  the  30  commands  already  moved,  and  the  remainder  of  the  program  is  left 
in  its  original  location  in  the  calling  program. 

If  the  channel  program  specified  in  the  call  can  be  entirely  moved 
to  the  low  core  vector,  then  immediately  on  return  from  the  data  select 
routine  the  area  it  occupies  can  be  used  for  other  purposes.   In  case  of 
redundancy  retries,  the  entire  channel  program  is  available  in  low  core.  An 
indirect  addressing  is  not  interpreted  during  the  move.   Therefore  the  word 
containing  the  channel  command  may  be  used  by  the  channel  program  until  the 
l/O  operation  is  completed. 

The  freedom  gained  by  the  above  procedure  imposes  one  restriction. 

Channel  programs  of  the  type 

lOCP   *+l,,l 
lOCP   **,,** 

cannot  be  used,  since  the  commands  are  not  executed  from  their  original 

location. 

All  selects  are  normally  made  with  both  the  command  traps  and 
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redundancy  traps  enabled.   If  the  call  specifies  it,  the  l/o  operation  will 
be  performed  in  such  a  way  that  the  Channel  Trap  Processor  will  make  no  attempt 
at  retrying  the  operation  should  a  tape  check  occur,  but  will  exit  immediately 
to  the  redundancy  exit  specified  by  the  user. 

After  the  channel  program  has  been  moved  and  checked,  the  select  is 
issued  as  above,  the  channel  program  started  with  an  RCH,  and  a  return  made  as 
for  non-data  selects. 

3.2.5.6.8,  The  Channel  Trap  Processor 

When  a  channel  trap  occurs,  IR2  is  immediately  saved  and  loaded  with 
the  channel  number,  which  is  then  used  in  all  channel -dependent  references  as 
it  is  in  the  select  routines.   Machine  conditions  are  saved  in  a  set  of  cells 
for  that  channel.   The  status  flags  for  the  trap  are  examined.   If  it  was  a 
tape  check  trap,  action  fully  described  below  is  taken.   If  it  was  an  EOF  trap, 
and  the  user  specified  an  EOF  exit,  the  exit  is  taken.   If  it  was  an  EOR  trap, 
the  ETT  trigger  is  tested,  and  if  on  and  the  user  specified  an  exit,  the  exit 
is  made.   If  neither  trigger  is  on,  and  the  user  specified  an  EOR  exit,  it  is 
taken.   If  the  ETT  trigger  is  on,  and  the  user  did  not  request  an  exit  for  that 
condition,  the  tape  in  question  is  terminated  with  an  end-of-file,  and  the  tape 
is  rewound  and  unloaded.  A  comment  is  printed  to  the  operator  to  replace  the 
tape,  and  a  pause  occurs.   Should  this  occur  on  a  scratch  tape  during  execution, 
and  the  user  is  writing  on  a  regular  scratch  tape,  or  is  writing  his  own  tape 
and  he  has  not  provided  another  one,  the  operator  will  consider  this  an  error 
and  terminate  the  job.   On  EOR  and  EOF  conditions  the  interrupted  program  is 
resumed  immediately  (after  restoring  machine  conditions),  if  the  calling 
program  did  not  specify  an  exit. 

When  a  tape  check  occurs,  the  information  left  by  the  select  routine 
is  examined.   If  the  l/o  operation  was  performed  with  an  indication  for  an 
immediate  return  a  redundancy  exit  is  made  immediately.   (except  for  the 
location  to  which  control  is  given,  an  RTT  exit  and  an  EOR  exit  are  identical.) 
The  tape  is  positioned  after  the  redundant  record  in  this  case.   The  trap 
processor  will  re-read  or  re-write  the  record  in  question  up  to  12  times.   The 
tape  is  backspaced,  and  the  retry  count  increased  by  one.   (The  retry  count 
is  set  to  zero  by  DELAY.)   If  the  retry  count  is  larger  than  12  when  writing  or 
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^8  when  reading,  an  RTT  exit  is  taken,  if  specified.  At  this  point  the  tape 
is  positioned  before  the  redundant  record.   If  no  exit  was  given,  a  comnient 
is  assembled  and  printed  on-line  and  off-line,  and  a  pause  occurs  to  allow 
the  operator  to  intervene.   This  comraent  specifies  the  tape  unit,  the  select 
operation,  and  the   number  of  retries  made. 

If  the  retry  count  does  not  exceed  U8,  the  select  instruction  is 
examined.   If  it  was  a  WRS  or  WEF,  a  portion  of  tape  is  erased  before  the 
next  retry  is  made.   If  a  tape  check  should  occur  during  this  erase,  no 
further  retries  are  made,  the  above  error  comment  is  printed,  and  a  pause 
occurs.   If  a  successful  erase  or  no  erase  is  made,  the  original  select  is 
re-issued,  the  channel  program  started  if  it  was  an  RDS  or  WES,  machine  condi- 
tions are  restored,  the  traps  are  enabled,  and  the  trapped  program  is  resumed. 

Whenever  a  record  is  transmitted  correctly  after  a  tape  check 
occurred,  a  comment  is  printed  (on-line  only)  with  the  same  information  con- 
tained in  the  comment  made  above  in  case  of  unsuccessful  recovery.   The 
trapped  program  is  then  resumed,  or  an  EOR  exit  taken  if  specified.   Note  that 
if  a  redundancy  trap  has  occurred,  only  the  words  up  to  the  point  where  the  tape 
check  occurred  are  transmitted. 

On  EOR  and  RTT  exits,  the  following  information  is  available. 

AC    _  count  of  words  transmitted  (see  restrictions  below) 
IRl     complement  of  the  location  containing  result  of  SCH 
instruction  after  trap  occurred 

The  word  count  is  the  number  of  words  transmitted  by  the  last  channel 
command  executed.   This  count  will  be  erroneous  if  the  last  channel  command 
executed  was  indirectly  addressed. 

When  a  program  received  control  from  the  Channel  Trap  Processor  at  an 
exit  location,  it  may  call  on  a  select  routine  to  process  the  same  tape,  another 
tape  on  the  same  channel  as  the  one  which  trapped,  or  a  tape  on  a  different 
channel.   If  a  call  to  a  data  select  routine  is  made  for  a  unit  on  the  same 
channel,  the  return  to  the  trap  processor  must  be  made  during  the  read  or  write 
start  time  of  the  tape  (i.e.,  before  the  first  tape  character  is  transmitted). 
This  varies  with  tape  drive  model  and  read  or  write  status.   A  good  rule  is 
"as  soon  as  possible,  never  more  than  2  ms . "  A  better  practice  is  for  the  exit 
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Program  to  set  a  flag  which  may  be  tested  in  the  main  program  for  an 
indication  of  the  appropriate  condition,  and  not  to  enter  the  select 
routine  from  the  trap  exits.   Return  is  via  a  TRA  1,  h.      See  Section  6  for 
descriptions  of  SYSRUD  and  other  pertinent  tape  handling  routines. 
Remember:   this  time  limit  applies  only  after  a  select  is  made  on  the  same 
channel. 

3.2.5.6.9#  Special  Tape  Handling  Routines 

SYSSKF  and  SYSSKR  are  special  select  routines  which  initiate  an 
RDS  with  the  redundancy  trap  for  the  channel  off.   Self-contained  channel 
programs  cause  one  file  or  one  record  to  be  passed  on  the  tape,  after  which 
a  command  trap  occurs.  A  count  was  specified  in  the  call,  and  at  each  trap 
this  count  is  decremented  by  one.   If  non-zero,  the  select  is  re-issued  and 
the  channel  is  started  to  skip  another  record  or  file.   Control  is  then 
returned  to  the  trap  processor  to  resume  the  trapped  program.   Immediately 
after  the  first  skip  is  started  control  is  returned  to  the  calling  program. 
Throughout  the  skipping  main  frame  programs  and  operations  on  other  channels 
may  be  running.  -  •  - 

Another  special  routine  is  SYSLSR,  which  is  used  to  load  and  check- 
sum standard  system  records.   This  routine  reads  with  the  traps  off  and  instead 
uses  a  very  complicated  channel  program.   There  is  no  return;  control  is  instead 
given  to  the  entry  point  of  the  record  loaded.   Index  registers  are  preserved. 

SYSTOW  is  a  routine  which  determines  whether  a  tape  is  logically  active 
and  takes  various  actions  as  described  in  Section  6.  A  tape  is  logically  active 
only  when  it  is  completing  a  data  select  or  WEF  operation. 

SYSATN  allows  the  calling  program  to  determine  to  which  physical  unit 
a  logical  tape  is  currently  assigned.   This  is  useful  for  printing  comments  to 
the  operator . 

3.2. 5-6. 10.   Peripheral  Tape  Buffering  Routines 

There  are  the  routines  SYSRIT,  SYSLIT,  SYSWOT,  SYSPCD,  SYSPCB,  cl ^«/ 
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SYSPPD,  which  accomplish  singly  buffered  reading  and  writing  of  the  system 
peripheral  input  and  output  tapes .   See  Section  6  for  details  on  calling 
sequences. 

Each  routine  calls  SYSTOW  to  delay  until  its  buffer  is  ready. 
A  record  is  then  transmitted  to  or  from  the  buffer^  a  data  select  routine 
is  called  to  empty  or  fill  the  buffer,  and  a  return  is  made  to  the  calling 
program.   SYSWOT  ,  SYSPCB,  SYSPCD,  and  SYSPPD  write  on  the  output  tape. 
SYSRIT  and  SYSLIT  interpret  the  look-ahead  codes  on  the  input  tape  to 
determine  the  mode  of  the'  next  record.   If  the  look-ahead  information  is 
wrong,  the  job  will  be  terminated  with  an  appropriate  comment.  A  record 
is  assumed  to  be  in  BCD  mode  unless  the  look-ahead  on  the  previous  record 
indicates  it  is  binary. 

SYSLIT,  the  alternate  entry  to  SYSRIT,  simply  bypasses  the  tape 
read  section  before  returning  to  the  calling  program. 

There  is  a  complete  set  of  auxiliary  routines  to  open  and  close 
buffers,  etc.,  which  are  used  by  various  system  components  when  necessary. 
They  are  not  aA/ailable  to  a  job  at  execution  time. 

3.2.5.7.  Floating  Point  Trap       '  ■■■■-   •  '  '' 
-  '••■■     3.2,5.7.1  <  General  '   ■•■■■. 

'  '   Whenever  an  AC  or  MQ,  overflow  or  underflow  occurs  during  a  floating 
point  operation,  a  trap  occurs  at  the  end  of  the  operation.   The  flag  cell  is 
location  OOOOOq;  the  trap  cell  is  location  OOOIOq.  At  this  time  status  bits 
are  stored  in  the  flag  cell  to  indicate  the  specific  error  which  caused  the 
trap.   These  bits  are:  '  - 


Position 


12 


ll^ 


15 


Value 

1 
0 

0 

1 
0 

1 


double  precision  address  error  occurred 
no  double  precision  address  error 

AC  and  MQ  were  being  used  as  one  long 
register  (add,  subtract,  multiply) 

MQ  was  not  an  extension  of  AC 
(Single  precision  divide) 
condition  was  an  underflow 

condition  was  an  overflow 
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16  1         condition  occurred  in  AC  (may  occur  in 

comlDination  with  I7) 

0        condition  did  not  occur  in  AC 

17  1         condition  occurred  in  MQ 

0         condition  did  not  occur  in  MQ 
The  floating  point  trap  processor  receives  control  whenever  a  floating 
point  trap  occurs.   Since  it  might  very  often  be  the  case  that  a  second  order 
underflow  exists  while  the  first  order  part  of  the  number  is  correct,  (the  second 
order  part  will  be  lost  in  any  case  when  single  precision  instructions  are  used), 
the  trap  processor  must  decide  whether  a  floating  point  trap  indicates  a  fatal 
or  non-fatal  condition.   If  non-fatal,  a  return  is  made  immediately  to  the 
trapped  program.   If  fatal,  machine  conditions  are  saved  for  the  post-mortem 
sump,  if  requested  by  the  user,  and  a  system  error  exit  is  taken. 

Any  overflow  is  considered  fatal,  since  a  second  order  overflow  cannot 
occur  without  a  first  order  overflow.   Normally  any  first  order  underflow  is 
fatal.  All  second  order  underflows  are  non-fatal  and  are  ignored. 

3.2. 5 -7 -So  System  Floating  Point  Trap  Procedure 
When  a  job  is  loaded,  the  floating  point  trap  cell  is  linked  to  .FTRAP, 
a  name  in  the  low  core  library  dictionary  which  is  the  entry  point  to  the  floating 
point  trap  processor.   At  execution  time,  the  time  when  the  users  program  receives 
control  of  the  machine,  floating  point  trap  mode  is  on.   A  description  of  the 
rules  for  processing  traps,  and  a  description  of  routines  for  modifying  the 
processing,  is  contained  in  ection  6.2.10. 

3.2.5.8  )  Action  of  the  l/O  Routines  at  End-of-File  ■   " 

At  execution  time,  if  an  end-of-file  is  read  during  reading  of  the 
system  input  tape,  the  message 

****ALL  INPUT  DATA  HAVE  BEEN  PROCESSED 
is  printed  and  the  job  is  terminated  by  SYSTEM.   Further  details  are  discussed 
in  sections  6.2.2.1,  and  6. 3- 6.1. 

3.2.5.9.  System  Exit  Routines 

All  system  exit  routines  first  check-sum  the  part  of  core  occupied  by 
the  Execution  Coordination  Routines.   If  this  check  fails  on  a  return  from 
execution,  low 
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core  is  refreshed  and  re-initialized  from  Master  Tape  1,   and  any  exit  is  now 
switched  to  the  SYSERR  routine  after  printing  a  coniment.   Then  the  Monitor 
area  is  check-summed.   If  the  Monitor  is  present,  control  is  given  to  its 
normal  entry  point.   If  not,  SYSLSR  is  called  to  give  control  to  the  Monitor 
record  on  Tape  1. 

SYSTEM  is  the  normal  job  termination  routine.   SYSERR  is  the  error 
exit  routine  which  saves  machine  conditions  for  the  post-mortem  dump,  prints 
a  comment,  gives  a  dump  if  requested,  then  proceeds  as  above.   There  is  an 
alternate  entry  to  SYSERR  for  low  core  routines  when  machine  conditions  have 
already  been  saved.   SYSTXT  is  the  return  for  all  translators.   It  returns  to 
an  entry  point  in  the  Monitor  different  than  that  for  SYSTEM,  or  refreshes 
the  Monitor  from  the  first  record  of  the  "save"  tape  when  necessary. 

3.2,5-10'  Miscellaneous  Routines 

SCATCH  is  a  routine  called  whenever  a  core  constant  is  executed. 
It  prints  the  "WHAT  WERE  YOU  DOING"  comment. 

8am  is  used  to  initialize  Low  Core  System  Control  and  is  used  in 
system  edits.   It  is  also  the  entry  point  of  one  of  the  system  records  con- 
taining low  core.   It  exists  only  when  rea.d  from  tape,  and  is  not  available 
in  core  a.t  other  times.       •  ■   ■  .• 

SYSD0D  and  SYSPAN  are  part  of  the  system  dump.   This  code  is  in 
core  at  all  times  and  is  used  not  only  for  the  post-mortem  dump,  but  also 
for  certain  diagnostic  phases  of  system  components  and  for  snap  dumps  at 
execution  time,   SYSD0D  produces  core  dumps,  and  SYSPAN  prints  the  console 
status  as  it  appears  at  the  top  of  the  post-mortem  dump.   The  user  should 
be  aware  that  SYSPAN  and  SYSD0D  do  not  preserve  the  contents  of  all 
registers  and  indicators,  so  that  these  routines  must  be  used  with  caution. 
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3.3.,  Programming  Systems  in  PORTHOS 

3.3-l»  General 

Programming  systems  vary  in  their  sophistication  from  the  simplest 
machine  coding  to  automatic  programming  languages  of  great  complexity. 

All  types  of  programming  systems  have  their  place  in  the  scheme  of 
things^  but  is  is  convenient  to  think  in  terms  of  a  hierarchy  of  systems, 
proceeding  from  machines  codes,  through  symbolic  coding  systems,  the 
more-or-less  machine -independent  artificial  programming  languages,  the 
procedure-oriented  systems,  to  the  highly  specialized  problem-oriented 
languages.   The  following  sections  discuss  these  levels  of  programming  in 
general  terms.   Specific  systems  available  with  PORTHOS  are  discussed  later 
in  this  chapter. 

3.3.1.1r  Machine-oriented  Languages. 

In  the  early  days  of  computing,  codes  were  written  in  the  absolute 
machine  code;  very  shortly,  symbolic  names  were  substituted  on  a  one-to-one 
basis  for  the  numerical  machine  operation  codes,  and  then  to  the  storage 
locations.   Symbolic  coding  is  much  more  pleasant  than  machine -language 
coding;  changes  are  easier  to  make,  and  many  innovations  have  been  added 
to  the  original  concept.   However,  this  type  of  programming  is  very  much 
tied  to  a  specific  machine,  and  is  far  removed  from  the  procedures  which  the 
collections  of  instructions  specify,  and  even  farther  removed  from  a 
description  of  the  problems  they  solve.   Historically,  the  name  "compiler" 
has  sometimes  been  applied  to  processors  for  such  languages.   At  present, 
however  the  term  "assembler"  is  firmly  established  in  this  context,  and 
"compiler"  has  taken  on  a  somewhat  different  meaning.   The  principal  features 
of  assembly  languages  and  their  processors  are  dictated  by  their  role  in 
computing  of  providing  a  palatable  and  convenient  way  for  the  programmer  to 
efficiently  utilize  the  hardware  features  of  a  computer  system.   Modern 
assembly  languages  provide  mnemonic  names  for  the  machine  operation  codes, 
and  pseudo-operations  which  simulate  hardware  features  not  actually  present 
in  the  system  or  which  set  parameters  in  the  program.   Assemblers  also  allow 
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the  progranmer  to  make  changes  to  his  program  with  ease  and  without  completely 
reprocessing^  to  use  sjrmbolic  variable  names  and  arithmetic  expressions  in 
place  of  specific  storage  addresses,  and  to  define  his  own  pseudo-operations  in 
the  form  of  "macros"  composed  of  elementary  operation  codes  in  the  language. 
Usually  assemblers  provide  both  absolute  and  relocatable  assembly,  giving  the 
programmer  vfhatever  control  he  needs  over  where  the  program  actually  resides 
in  storage  at  execution  time. 

The  assembly  program  is  primarily  a  processor  of  lists;  it  assigns 
actual  operation  codes  and  storage  locations  for  symbols.   Summaries  of  the 
information  available  in  the  lists  about  a  specific  program  are  normally 
available  to  the  programmer  to  aid  in  debugging. 

Examples  of  assembly  programs  for  the  IBM  709^  are  FAP,  MAP,  UMAP, 
SCAT,  and  SCATRE,  the  last  being  presently  available  in  the  PORTHOS  system. 
An  important  role  of  assembly  systems  is  the  preparation  of  subroutines  for 
the  higher  level  languages. 

A  second  type  of  machine-oriented  language  is  that  of  the  interpreters. 
The  earliest  interpretive  languages  closely  resembled  machine  codes,  except 
that  they  were  for  fictitious  machines.   This  "machine"  code  was  placed  in 
storage  along  with  a  set  of  subroutines  and  an  interpreting  program  which 
scanned  each  of  the  fictitious  machine  instructions  in  turn,  transferring 
to  subroutines  for  each  and  executing  them  immediately. 

These  systems  were  wastefiil  of  storage,  were  inefficient  in 
operation,  and  very  wasteful  of  computer  time.   They  are  rarely  seen  today. 

3.3-l'2»  Procedure-Oriented  Languages 

By  far  the  most  activity  in  designing  programming  languages  has 
been  in  the  area  of  "scientific"  languages,  though  considerable  efforts 
have  been  made  toward  creating  languages  for  use  in  commercial  applications. 
Notable  among  the  former  are  IT,   I4ath-Matic,  MAD,  FORTRAN,  JOVIAL,  KELIAC, 
GAT,  and  ALGOL;  among  the  latter,  perhaps  COBOL  (COmmon  Business  Oriented  Language 
is  the  most  ambitious  and  most  widely  known  example.   Only  languages  of  the  first 
kind  are  available  through  PORTHOS  at  this  time. 
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The  distinguishing  feature  of  languages  at  this  level  is  that  they 
begin  to  look  like  languages;  more  precisely^  they  look  like  the  language  of 
mathematics,  and  in  particular,  algebra.   They  have  two  important  differences 
from  natural  languages,  however;  they  are  in  large  part  not  redundant,  and 
their  syntax  is  rigidly  defined  and  unambiguous. 

Procedures  are  described  in  more  general  terms  than  in  the  assembly 
languages:   the  assembly  language  specifies  what  machine  instructions  are 
carried  out  and  their  order;  the  procedure  language  specifies  what  is  to  be 
done,  but  not  the  machine  instructions  to  do  it.   Hence  the  assembly  language 
is  closely  tied  to  the  machine,  whereas  the  procedure  language  is  to  a  very 
large  extent  machine-free.   It  is  not  completely  machine-independent  because 
it  cannot  describe  a  procedure  which  the  computer  cannot  carry  out.   For 

I   example  a  procedure  cannot  call  for  sensing  the  temperature  if  the  computer 
has  no  means  for  doing  so;  or,  more  realistically,  it  cannot  call  for  reading 

I   from  a  magnetic  tape  if  the  computer  has  no  access  to  magnetic  tapes. 

An  example  of  the  use  of  a  typical  procedure-oriented  language  is 
the  following.   A  proced'ore  in  ALGOL-60  to  evaluate  a  polynomial  vfith  the 
arbitrary  coefficients  a,  b,  c,  d  is: 

I  begin  real  a,  b,  c,  d,  x; 

real  procedure  polynomial jp   ^ 
polynomial  :=  a+bx+cx  +dx  ; 

read  (a,  b,  c,  d,  x); 
print  (polynomial,  a,  b,  c,  d,  x); 
end 

Note  that  no  mention  was  made  of  any  machine  instruction  or  hardware  component. 
Hence,  the  procedure  should  mean  the  same  thing,  in  terms  of  final  res-alt,  to 
any  machine  which  has  been  programmed  to  accept  such  statements. 

This  leads  to  the  subject  of  processors  for  the  procedure-oriented 
languages.   Any  such  language  is  to  a  large  extent  useless  "ontil  a  program 
is  written  to  cause  a  m.achine  to  be  able  to  r:/:     i-  instructions  (or  procedure 
description)  in  the  source  language  and  produce  a  set  of  machine  language 
instructions  for  carrying  out  the  procedure. 
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There  have  been  various  approaches  to  the  problem  of  preparing  a 
set  of  machine  instructions  from  a  procedural  language.   One  method  is  based 
upon  the  principle  of  simulating  a  computer  which  has  the  same  logical 
structure  as  the  language.   A  translating  program  which  utilizes  this  approach 
is  called  an  interpretive  compiler;  the  backbone  of  a  scheme  of  this  kind  is  an 
interpretive  program  such  as  that  described  in  the  preceding  section.   To 
this  is  added  a  translating  program  which  translates  the  input  language  into 
the  "machine-language"  of  the  fictitious  computer.   This  approach  has  been 
used  in  some  versions  of  ALGOL-60  translators^  but  the  result  is  not  very 
efficient. 

A  second  approach  to  the  problem  of  translating  from  an  artificial 
language  into  a  program  that  a  machine  can  execute  is  to  completely  transform 
the  input  statements  into  machine  code.   This  produces  a  relatively  efficient 
program,  but  presents  some  real  problems  to  programmers  attempting  to  write 
such  a  translating  program.   It  is  on  this  point  that  much  current  research 
in  programming  is  being  carried  on,  and  many  articles  have  been  written  on  the 
formal  properties  of  artificial  languages  and  their  processors. 

All  of  the  procedure-oriented  languages  available  through  PORTHOS 
(MAD,  PORTRAIT  II,  and  ALGOL-60)  are  completely  translated  into  machine  code 
before  execution. 

3.3«l-3»  Problem-Oriented  Languages 

There  is  being  developed  today  a  class  of  programming  systems 
which  must  be  considered  as  being  one  step  higher  on  our  scale  than  the 
powerful  procedural  languages.    These  systems  are  ordinarily  limited 
in  scope  but  their  vocabulary  is  extremely  powerful.   Their  aim  is  to  describe 
a  problem  (say,  in  a  specific  field  such  as  structural  engineering  or  fluid 
dynamics)  in  the  same  terms  as  would  be  used  to  describe  it  to  a  human  being 
who  is  knowledgeable  in  the  field.   The  computer  then  selects  procedures 
(perhaps  originally  written  in  a  procedural  language)  for  the  solution  of 
the  problem  with  or  without  further  instructions  from  the  user. 
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Several  approaches  have  been  used  to  prepare  processors  for  such 
languages.   One  system  of  this  type  (DYAM),  a  simulation  language  in  the 
field  of  dynamic  analysis,  produces  a  FORTRM  program  from  the  source 
language  program  by  means  of  a  preprocessor.   A  second  (STRESS)  oriented  toward 
structural  analysis  is  translated  immediately  into  machine  language. 

The  heart  of  such  a  system  is  the  ability  to  call  general  procedures. 
This  feature  is,  of  course,  one  possessed  by  the  procedural  languages 
themselves,  but  with  this  level  of  language,  there  is  a  syntax  and  semantics 
among  the  procedures  which  does  not  ordinarily  exist  at  the  lower  levels. 

3.3.1.U,  Specialized  Programs 

The  above  sections  have  briefly  discussed  some  of  the  more  common 
programming  systems,  most  of  which  are  available  through  PORTHOS.   There  are, 
of  course,  many  other  systems  written  for  specialized  purposes.   Representative 
of  these  are  IPL-V,  an  information  processing  language;  COMIT,  a  system  for 
linquistic  analysis;  STATMOW,  a  statistical  monitor  available  through  PORTHOS; 
and  LP-90,  a  linear  programming  system.   It  is  planned  to  incorporate  several 
of  these  into  the  PORTHOS  system. 
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3. 3 -2.  Machine-Oriented  Languages  in  P0RIH03 

3.3.2.1,  SCAT 

SCATj  the  SHARE-C_cn.piler-AsseE±aer-TranslatGr,  is  a  sj^cclic  assezilj 
program  "Cc  facili^atie  Lhe  "-■rriting  of  machine  language  prcgrams  icr  ~he  EM 
709^.   It  provides  for  the  use  cf  symbolic  ana  flcaring  addresses,,  address 
arithmetic^  mnemonic  cpera~icn  codes,  macro -instructions,  ajid  automatic- 
insertion  of  library  subroutines.   The  use  of  the  word  "compiler"  in  ~he  name 
of  the  program  is  historical.   Its  use  is  in  uhe  older  sense,  imnl^ring 
automatic  insertion  of  library  subroutines  and  expajcsion  of  a  single  macro- 
instruction  into  a  simple  sequence  of  several  frequently  occ'urring  machine 
instructions,  rather  than  in  the  more  recent  sense  of  an  automatic  prograirmer. 

SCAT  is  a  tvro  part  assembler  which  in  brief  orerates  as  fcllcirs. 
Programs  written  s^.tubolically  as  one  order  per  card  are  ingested  d'uring  the 
first  phase  by  the  "compiler"  which  scans  the  program  for  sjmibols  and  outputs 
a  condensed  deck  of  cards  (SQUOZE  deck)  containing  tables  of  these  s;/ti.bol3 
and  the  program  condensed  and  efficiently-  coded.   Dttring  the  second  phase  this 
SQUOZE  deck  is  ingested  by  the  "modify  and  load"  program  which  converts  the 
object  program  to  binary  machine  langc^age  -.'rhich  iy   option  can  either  be  loaded 
ready  to  run  or  output  on  absolute  binary  cards  (23  orders  per  card)  for 
loading  and  running  at  a  later  time.   The  "lister"  can  produce  a  printed 
version  of  the  program  at  either  of  these  stages.   Sttnbolic  corrections  to 
a  program  can  be  inserted  into  the  second  phase  alcng  with  the  SQUOZE  deck. 

At  present,  no  SCAT  compiler  is  actually  available  to  the  user 
on  the  Master  tape  cf  the  PORTHOS  system;  essentially,-  the  same  lang-;age  is 
available  as  a  relocatable  sjTnbolic  assembly  program,  3CATRE. 

The  interested  reader  should  see  "SCAT,  SEAaZ-Ccmpiler -Assembler- 
Translator,  Symbolic  Assembly  Program  for  tne  i^M  i'09-  ,  -Library  Routine 
LI-UOI-SSAl-1-BX,  available  from  the  Librarian  in  Room  1.6=   ZRL. 

3.3.2.2.  3CATRE 

In  order  to  gain  flexibility,    an  automatic  operating  system  such 
as   PORTHOS  must  provide   for   the   assembly  cf  both  absolute  and  relocatable 
programs.      SCATHE   (SCAT-Ocmpatible  Assembler,    Translator,   Relocatable) 
provides  both.      SCATRE   is   a  modification  of  LllAP,    the  University   :f  Michigan 
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Assembly  Program^  and  an  attempt  was  made  to  maike  the  input  language  of  SCATRE 
consistent  with  that  of  SCAT.   However,  some  differences  do  exist. 

The  term  "relocatable"  implies  that  the  object  program  has  been 
assembled  from  its  symbolic  form  in  such  a  manner  that  its  address  are 
relative  rather  than  absolute  (absolute  addresses  refer  to  specific  locations 
in  core),  and  the  object  program  can  be  "loaded"  into  arbitrary  portions  of 
core  by  a  "loader"  program  (see  section  3- 2. 3)  with  a  minimum  of  effort. 
Thus  various  portions  of  a  long  program,  or  closed  subroutines,  can  be 
assembled  at  different  times  into  relocatable  object  form  and  loaded  for 
execution  as  desired. 

The  interested  reader  should  see  "SCATRE,  University  of  Illinois 
SCAT -Compatible  Assembler,  Translator,  Relocatable  for  the  IBM  709O  ", 
Library  Routine  LI-UOI-SCRE-I9-BX,  available  from  the  Librarian  in  Room 
165  ERL. 
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3* 3- 3.  Procedure-Oriented  Languages  in  PORTHOS 

3.3-3-1-  General  Discussion  of  Available  Systems 

3-3'3'l'l-  Introduction 

There  are  three  algebraic  language  translators  available  to  the  user 
within  the  PORTHOS  system:   FORTRAN  II,  MAD,  and  ALGOL.   Each  has  its 
advantages  and  disadvantages,  and  the  user  should  be  aware  of  these  differences. 
For  example,  MAD  compiles  much  faster  than  FORTRAN,  but  FORTRAN  produces  a  more 
efficient  program  when  array  subscription  is  involved.   In  the  following 
paragraphs  these  three  languages  and  their  processors  are  compared  on  the 
basis  of  compilation  speed,  error  checking,  object  program  efficiency, 
generality  of  the  language,  and  other  features. 

3- 3- 3- 1-2.  Compilation  Speed 

The  time  needed  for  a  compilation  is  largely  dependent  on  the  number 
of  cards  input.   Each  compiler  has  an  apparent  minimum  compilation  speed  for 
a  short  (say,  50  cards)  program.   As  taken  from  typical  times  determined  by  the 
Monitor,  this  apparent  minimum  time  in  minutes  for  a  50  card  program  is  as 
follows : 

MAD       .1 

ALGOL     . 2 

FORTRAN   . 3 
However,  these  figures  depend  on  several  conditions  other  than  number  of  cards 
input  (at  times  MAD  compiles  faster  than  SCATRE  assembles).   For  instance, 
an  ALGOL  program  usually  has  about  .2  minutes  charged  to  compilation  time 
because  of  its  present  position  on  the  master  tape,  and  sometimes  a  MAD 
program  compiles  fast  enough  that  the  system  accounting  clock  has  not 
changed  its  setting,  therefore  showing  no  time  elapsed  at  all.   When  an  error 
is  found  in  a  FORTRAN  program,  the  time  may  be  only  .2  minutes. 

For  longer  programs,  these  times  diverge  rapidly.   For  a  reasonably 
large  program  (abour  300  cards)  the  approximate  times  in  minutes  are  as  follows: 


MAD 

•3 

-    .k 

ALGOL 

•3 

-    .k 

FORTRAN 

.8 

-  1.0 
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For  much  larger  programs,  ALGOL  is  as  fast  as  MAD  and  both  are  from 
5  to  10  times  as  fast  as  FORTRAN. 

3-3«3'l'3/  Error  Checking 

Because  of  the  nature  of  the  languages  and  the  design  of  the 
compilers*  MAD  and  ALGOL  are  both  more  sensitive  to  errors  in  program  syntax 
(grammar  or  statement  structure)  than  is  FORTRAN.   Each  of  these  compilers  has 
some  special  feature  in  this  area. 

MADj  for  instance,  has  a  very  clear  set  of  error  messages,  and  most 
errors  are  caught  in  the  first  pass  through  the  program.   In  the  second  pass, 
while  assigning  locations  to  variables,  MAD  will  print  out  a  list  of  all 
variable  names  which  were  mentioned  only  once,  helping  the  user  find  spelling 
errors. 

FORTRAN  spends  a  large  percentage  of  its  compiling  time  analyzing 
the  accessibility  of  different  portions  of  the  object  program.   This  flow 
analysis  is  one  reason  for  FORTRAN'S  slow  speed,  but  is  often  helpful  in 
bringing  to  light  subtle  coding  errors.   FORTRAN  has  relatively  poorer  error- 
checking  facilities,  and  it  occasionally  permits  incorrect  statements  to 
compile. 

ALGOL  has  very  extensive  error  checking  facilities,  made  possible 
by  its  exact  definition  as  a  language. 

3'3-3'l-^'  Object  Program  Efficiency 

The  "efficiency"  of  an  object  program  is  a  very  difficult  entity 
to  measure.   For  instance,  although  FORTRAN  handles  2-dimensional  matrices 
efficiently,  it  handles  alphabetic  data  and  logical  decisions  inefficiently. 
As  a  general  comparison  of  the  efficiency  of  a  program  which  includes  arrays, 
fiinctions,  logical  decisions,  and  input-output,  MAD  and  FORTRAN  are  very 
close;  perhaps  MAD  is  as  much  as  20%  slower.   In  general,  ALGOL  programs  run 
about  twice  as  long  as  equivalent  FORTRAN  programs. 
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3'3'3-l-5«  Advantages  of  the  Various  Compilers 

Such  a  comparison  of  these  languages  is  perhaps  somewhat  invalid, 
since  each  language  can  perform  some  things  efficiently  which  the  others 
cannot  perform  as  well  (or  in  some  cases  not  at  all).   Basically,  the 
efficient  usages  are  as  follows: 

FORTRAN 

1.  Fast  handling  of  arrays 

2.  Fast  execution  of  loops 

3.  Subroutines  save  index  registers 

h.      More  "built-in"  functions  available 

5-   Somewhat  more  efficient  compilarion  of  arithmetic  statements 

6.  Extensive  flow  analysis  prior  to  compilation 

7.  Double-precision  and  complex  arithmetic 

8.  Popularity 


MAD 


1.  Fewer  instructions  produced  by  l/O  statements 

2.  Variables  can  be  "predefined",  before  execution 

3.  The  ability  to  vary  array  dimensions  at  execution  time 
k.  l/O  possible  without  format  statements 

5.  Mixed  (floating  and  integer)  expressions  permitted 

6.  Efficient  Boolean  Algebra 

f .  Statement  labels  easily  transmitted  to  subroutines  as  arguments 

8.  Functions  and  subroutines  with  more  than  one  statement 
definable  at  any  point  in  a  program. 

9.  Step  size  in  loops  may  be  any  algebraic  expression 

10.  Multiple  entry  points  to  subroutines. 

11.  Recursive  subroutines  may  be  defined. 

12.  Push-doi-m  list  manipulation  statements 

13.  Ability  to  handle  variable-size  records  on  binary  tapes. 

lU.  Full -word  (35  bit)  integers,  as  opposed  to  17  bits  maximum 
in  FORTRAN. 

15.  Any  arithmetic  expression  as  a  subscript,  and  an  arbitrary 
number  of  dimensions,  may  be  used. 

16.  Subscription  of  arrays  in  any  fashion  desired. 

17.  BACKSPACE  FILE  statement  available. 
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ALGOL 


1.  Dynamic  storage  allocation  (variable  dimensions) 

2.  Official  algorithm  publication  language  of  the 
Association  for  Computing  Machinery 

3.  N-umbers  h,    3,    G,    J,    8,  11  and  15  under  MAD  also 
apply  to  ALGOL 

h.      Closer  to  every  day  usage  of  the  English  lang-aage 
than  is  PORTRAU 

5.   Paruic'olarly  suited  for  checking  algorithms  of 
numerical  analysis. 


3-3'3'l'6#  Disadvantages  of  the  Various  Compilers 

FORTRAIJ 

1.  Lacks  generality  provided  by  MAD  and  ALGOL 

2.  Slow  compilation 

3.  Fewer  error  checking  features 

k.      Susceptible  to  machine  errors  diiring  compilation  due 


MAD 


to  extensive  use  of  scratch  tapes. 

1.  Statements  in  language  are  long 

2.  Destroys  index  registers  1  and  2 


ALG-OL 

1 
2 

3 
k 

5 


:.sage  prevents  widespread  exchange  of  programs 


Difficult  to  call  programs  written  in  other  languages. 
Lack  of  ability  to  read  and  write  on  binary  scratch  tapes 
Rela~ively  slow  r'onning  speed  of  object  program 
Character  set  is  somewhat  cumbersome 


There  is  no  1 
specified  as  ^ 


ational  input/output  standard 


3.  3- 3- 2.  FORIRAIJ  II 

3'3'3'2.1»  General 

The  IBM  FORTRAN  II  programming  system  consists  of  two  parts:  a 
prograinming  lang-aage  quite  unlike  machine  language  but  similar  to  mathematical 
(algebraic)  notation,  and  a  processor  program  which  converts  a  program  written 


in  the  FORTHAII  II  language   Inrza  nacr.ir.e  las.g-iage  instruct icr.s.      .-.s  tr.e 
name  FORT?_-i:  II   i_r.plies,   nicre   thar.  cr.e  version  cf  zhe  7:?.I7_-i:  lang-j-age 
is   in  existence;   zhe  potential  user   shculd  take   into  consicera'GiQn  trie 
fact   that  his  programs  written  for  the  FOR'IRAIT  II  processor  at   this 
installation  may,    or  may  nct^   reauire  minor   alterations   cefcre  "hey  7riH 
run   successf'ully  at    some  other   ins" alia" icn.      Jor   a  seneral  iescri'C"ion 
of  the  F0RT?_-I7  family  of  languages^    ^he  reader   should  see   "Oeneral  Information 
Manual,   F0R3J-I;",    HM  puolication  F28-807ij-2.      Since  "he  prcper-ies   cf  the 
FORTRAK  II  language,    and  pec-uliarities   of  the  709-  processor   for   it   are   «-ell 
documen-ed  elsewhere    (e.g.    Iffi'I  pufclica-ion  C28-605^-i^,    "IBI'iTCf:    ~:-- 
Programming  Systems,   FORSEIAII  II  Programming"),   no  effort  will  te  made  here 
to  repeat   ~hat   information.      Suffice   Lz  "o   say  that  FORI?_-I"  II  is   a 
procedure-oriented  artificial  lang"uage  that   enahles   a  user   to  ratiily  and 
concisely  express  mathematical  prccediures,    or   algorithms,    in  a  way  at    once 
palatable   for  human  readers   and  translatable   oj  the   ooaiputer.      lo   a  very 
large   extent  the  proced'ures  thus   expressed  are   independent   cf  any 
particular   computer,    and  will  r-un  on  an;,-  computer   i 
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program  is  available. 

A  comparison  of  FORIRAIi  II  '-■rith  the  other  algebraic  lang-uages 
available  at  this  installation  is  made  in  sections  3'3'5-l'5  sjid.   3.2-3'i'5, 
as  an  aid  to  prospective  users  in  deciding  n-hich  lang^uage  is  most  suitable 
to  their  applications  and  needs. 

3.3.3.2.2«  FA?,  the  FORIRAIT  II  Assembly  Program 

The  end  res'ult  of  a  translation  of  a  so'uroe  program  written  in  an 
algebraic  language  such  as  FORTRAi;  II  is  a  set  cf  machine  lang-uage  instruct: 
Instances  may  arise  in  the  co'urse  cf  preparing  programs  in  FORIRAIi'  II  where 
the  procedure  in  mind  is  not  easily  expressed  in  that  lang"-:age.   r  cr 
example,  a  programmer  may  vrish  to  test  a  bit  position  in  a  word.   This  is  a 
cumbersome  task  to  describe  in  FORIR.-ir  II.  but  can  be  easily  done  with  a 
masking  operation  if  machine  lan:g'uage  can  be  employed.   To  facilitate  the 
transition  from  one  level  cf  language  to  another,  the  FA?  language  has  been 
incorporated  into  the  FORTRAir  II  "system",.   The  FA?  lang"uage  is  a  sj-mbolic 
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machine  language  programming  system  (assembler)^  and  FAP  subroutine  for 
FORIRAJI  II  main  programs  can  be  written,  or  vice-versa.   FAP  or  one  of  its 
derivatives  is  commonly  available  at  installations  using  FORTRAN  II  whether 
one  of  the  IBM  operating  systems  is  used  or  some  other  operating  system. 

At  this  installation,  the  place  of  FAP  in  the  PORTHOS  executive 
(operating)  system  is  taken  by  SCATRE,  which  is  described  in  section  3- 3-2.2. 
Actually,  the  degree  of  compatibility  between  FAP  and  SCATRE  is  very  high. 
The  disucssion  of  FAP  here  is  to  insure  that  users  who  are  concerned  with 
inter installation  compatibility  are  aware  of  the  fact  that  some  changes  may 
be  required  in  the  assembly-language  portions  of  mixed  programs. 

3- 3- 3- 2. 3.  The  FORTRAN  Monitor,  IBSYS,  and  the  SHARE  Operating  System  (SOS) 

These  executive  systems  are  used  at  various  installations  for 
essentially  the  same  purposes  as  PORTHOS.   The  compatibility-conscious 
user  should  familiarize  himself  with  these  systems,  so  as  to  minimize  or 
eliminate  alterations  when  running  programs  at  other  installations.   The 
interested  reader  should  see 

IBM  publications  C2d-60^k-2   and  028-605^+-^+ 
for  information  on  the  FORTRAN  Monitor, 

IBM  publication  C28-62U8 
for  information  on  IBSYS,  and 

IBM  publications  X28-1213,  328-1219, 

328-1262,  328-1377,  328-1395, 

328-lJ+Ol,  and  328-162U 
for  information  on  the  SHARE  Operating  System. 

The  user  must  be  careful  to  note,  however,  that  the  material 
in  the  publications  above  is  not  applicable  to  this  installation;  this 
manual,  itself,  is  the  basic  source  of  information  concerning  operation 
under  PORTHOS. 

3.3.3.2.^1.  Modifications  to  FORTRAN  II  Within  PORTHOS 

Since  FORTRAN  II  source  programs  are  expected  to  be  run  \inder 
PORTHOS,  and  for  some  other  reasons  explained  below,  certain  of  the  standard 

Date :  k/l-^/Sk 

Section:  3.3. 3- 

Page :  6 
Change : 


FORTRAN  statements  are  not  allowable,  and  others  have  been  modified.   These 
are  listed  below. 

1.  The  FORTRAN  statement 

STjZiP  n 
is  unacceptable. 

2.  Closed  functions  and  subroutine  subprogram   names  (SIN, 
SORT,  EL0G,  etc.)  must  be  written  (called)  without  the 
terminal  F.   For  example , 

Y  =  SIN  (X) 

3.  Built-in  functions  (open  subroutines  and  aritlimetic  statement 
functions)  must  be  written  with  the  terminal  F.   Library 
functions  called  with  the  incorrect  terminal  F  will  not 
operate  properly. 

k.      All  FORTRAN  programs  must  terminate  with  the  statement 

END 
but  processing  functions  on  the  END  card  will  be  ignored. 

5.  Statements  to  read  and  write  drums  must  not  be  used. 

6.  Format  checking  is  relaxed  to  allow  compilation  of  non -FORTRAN 
l/O  symbols  in  formats. 

7.  Differences  in  l/O  conversion  of  data  are: 

a.  All  blanks  are  ignored; 

b.  An  all  blank  field  is  read  as  -0; 

c.  If  a  nimiber  is  to  be  printed  in  a  field  too  small  for 
the  number,  an  l/O  error  results. 

8.  In  addition  to  the  usual  methods  for  terminating  a  FORTRAN 
execution  (i.e.,  reading  last  data  card  and  running  past  the 
end  of  the  program)  the  user  may  execute  one  of  the  following 
statements : 

(1)  CALL  SYSTEM 

(Used  if  no  dump  is  desired). 

(2)  CALL  SYSERR 

(used  if  a  dump  is  desired;  a 
DUMP  control  card  is  a 
prerequisite). 
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9-   Each  main  program  or  subroutine  must  be  preceded  by  a 

$  F0RTRA1I 
control  card. 

10.  The  maximiim  size  of  physical  records  comprising  logical 
records  is  128,^  words. 

11.  The  FORTRAN  statement 

READ  n,  list 
has  the  same  effect  as 

READ  INPUT  TAPE  7,n,    list 
The  FORTRAN  statement 

PUNCH  n,  list 
has  the  same  effect  as 

WRITE  0UTPUT  TAPE  ^,n,    list 
Note  that  the  FORTRAN  statement 

PRINT  n,  list 
does  not  have  the  same  effect  as 

WRITE  0UTPaT  TAPE  6,    n,    list 
PRINT  causes  a  message  to  the  operator  to  be  printed  on  the 
on-line  printer. 

12.  The  statements  RKAD  INPUT  TAPE  and  WRITE  0UTPUT  TAPE  may  be 
abbreviated  as  RIT  and  W0T,  respectively. 

13.  PART  III,  APPENDIX  C,  and  APPENDIX  D  or  the  709-709O 
FORTRAN  Programming  System  Reference  Manual  shoiild  be 
disregarded  since  the  FORTRAN  Monitor  is  not  used  here. 
(Form  Numbers  C28-605U-2  and  C28-603h-k). 

3.3.3.3,  ALGOL-60 

3.3.3.3.1.   General 

Algol-60  is  an  algebraic  procedure-oriented  language  similar  in 
many  respects  to  other  such  languages  as  FORTRAN  and  MAD. 


Date :  h/l'^/6h 

Section:  3.3.3. 

Page :  8 
Change  : 


Algol-6o  is  supported  by  many  national  computer  societies  as  an 
international  programming  language^  and  it  is  hoped  by  its  adherents  that 
it  will  emerge  as  the  standard  language.   It  was  designed  by  an  international 
group  of  experienced  compiler  builders  and  refined  from  an  earlier  version 
(ALGOL-58)  after  much  discussion  and  debate  by  interested  parites 
throughout  the  world.  .^  ■  ■  •■  . 

The  ALGOL-60  compiler  which  is  available  through  PORTHOS  is  the 
ALCOR-ILLINOIS  709O  ALGOL-60  Translator,  and  was  written  at  the  University 
of  Illinois  by  individuals  from  the  ALCOR  organization  and  the  University 
of  Illinois.   The  ALCOR  organization  is  formed  around  the  ALGOL-60  language 
and  its  translator  (compiler).   The  entire  ALGOL-60  language,  as  defined 
in  the  "Revised  Report  on  the  Algroithmic  Language  ALGOL-60",  P.  Naur,  Ed., 
Communications  of  the  Association  for  Computing  Machinery  6  (Jan.  I963), 
I-I7,  with  the  exception  of  the  own  feature  has  been  implemented. 

Distinctive  features  of  the  ALGOL-60  language  and  its  processor 
are  dynamic  storage  allocation,  identifiers  of  arbitrary  length,  recursive 
programming.  Boolean  operations,  and  powerful  logical  statements. 

3.3.3.3.2*  References  •  ■  - 

The  interested  reader  should  see  "Structure  and  Use  of  ALGOL-60", 
"User's  Manual  for  the  ALCOR-University  of  Illinois  ALGOL-60  Translator" 
both  of  which  are  available  from  the  Librarian,  165  ERL. 

3.3.3-^.  MAD  ■      ■  • 

3-3-3-^-l»  General     '  '■'  ' 

MAD,  the  Michigan  Algorithm  Decoder,  was  designed  and  implemented 
at  the  University  of  Michigan.   Specific  objectives  were  set  up  when  the 
language  was  designed,  among  which  are,  in  the  order  of  relative  importance, 

1)  high  translation  speed, 

2)  as  few  restrictions  on  the  user  as  possible  (i.e.,  nearly 
complete  accessibility  by  the  user  of  all  the  features  of 
the  available  hardware). 
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3)  Object  program  efficiency. 

The  language  was  based  in  large  part  on  ALGOL-58,  but  differs  in  several 
important  ways.   For  instance ;  MAD  does  not  have  the  block  structure  of 
ALGOL  and  hence  does  not  allocate  storage  at  execution  time  in  the  same 
manner;  identifiers  of  arbitrary  length  are  not  allowed;  some  features, 
such  as  declaration  of  array  dimensions,  are  cumbersome,  but  are  compiled 
efficiently  and  rapidly.   A  major  departure  from  the  ALGOL  concept  is  in  the 
construction  of  the  compilers  so  that  the  language  may  readily  be  extended 
by  defining  new  operations. 

A  great  effort  was  made  by  the  designers  of  MAD  to  make  it  a  true 
"algorithmic"  language  and  not  strictly  an  algebraic  language.   Thus,  its 
scope  overlaps,  but  does  not  exactly  coincide  with,  that  of  ALGOL.   For 
this  reason,  subroutines  are  available  in  MAD  for  the  manipulation  of  bits 
and  BCD  characters  and  for  ease  in  utilizing  the  magnetic  tapes. 


3.3.3.^.2,  References 

A  number  of  publications  at  various  levels  are  available.   Among 
them  are 
1.   "A  User's  Reference  Manual  for  the  Michigan  Algorithm  Decoder  (MAD  for 

the  IBM  7090",  by  R.  and  J  Flenner  (Digital  Computer  Laboratory 

Library  Program  L2-U0I-MAD1-2-BX); 

"A  Computer  Primer  for  the  MAD  Language",  by  E.  I.  Organick 

"The  Language  of  Compilers",  by  B.  A.  Galler 

McGraw-Hill  Book  Company,  Inc.,  New  York,  I962 

"The  Internal  Organization  of  the  MAD  Translator",  by  B.  W.  Arden, 

B.  A.  Galler,  and  R.  M.  Graham,  Communications  of  ACM,  p.  28-3I, 

Jan.  1961,  V^,  n.  1; 

"An  Introduction  to  Digital  Computing",  by  B.  W.  Arden; 

"A  MAD  Pr-imer",  by  E.  I.  Organick 
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3.3>^«  Specialized  Programming  Systems 
3.3'^-l-  The  Statistical  Monitor  (STATMON) 

3-3.^.1.1^  General 

The  STATistical  MONitor  (STATMON),  a  system  for  general  processing 
of  statistical  data^,  currently  undergoing  development;,  is  now  partially  operative 
and  available  for  usage  under  certain  restrictions  which  will  be  changed 
in  the  future. 

3.3'^'l-2#  General  Functions 
Correlations 

1.  Correlations,  means,  standard  deviations,  and  covariances  are 
obtained  on  n  variables  (n  <  99)  over  m  observations  (m  <  32,000).  .,, 

2.  Results  are  printed  out  for   .  ,.  .   .      , 

a)  first  row  of  observations  read  in; 

b)  means  and  standard  deviations; 

c)  covariance  matrix;  .   _  .,;".•:... 

d)  correlation  matrix.  ■  ^ 

The  output  format  used  is  floating  point  (E15.7)  with  seven  digits  in  each 
result   of  a,  b,  and  c  above  and  fixed  point  (Fl^.8)  for  the  correlation 
matrix  results. 

3.  The  input  deck  submitted  must  conform  to  the  following: 


CARD  1 

CARD  2 
CARD  3 
CARD  k 


Problem  Run  Card  (Standard  DCL  ID  Card) 
Col.  1     Col.  8 


STATM0N 


-)(- 
* 


C0RRELATI0NSbA=B  (where  b  represents  a  blank  space) 

F0RMATb * 

Format  is  FORTRAN  format  for  one  row  of  data, 
with  the  exception  that  the  format  string  should 
not  be  enclosed  in  parentheses  and  must  be 
terminated  by  an  asterisk  "*". 
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CARD  5 


CARDS   6 
through  km+5 


DATAbA3b(M,n) 

where  m  is  the  number  of  observations  and 

n  is  the  number  of  variables  as  indicated 

by  the  FORMAT  card,  Card  k. 
Data  (where  k  is  the  number  of  cards  per  row 

and  m  is  the  number  of  observations). 

All  data  must  be  read  in  as  floating  point 

numbers  with  an  E  or  F  format. 


Note:   Conditions  1  (limit  on  n)  and  2  (print-out  format  and  core  dump)  above 
are  restrictions  that  will  not  apply  when  STATMON  is  fully  developed.   Condition 
3  describes  only  one  of  the  many  systems  of  input  that  will  be  possible  in  the 
fully  developed  Statistical  Monitor.   The  A  and  B  noted  in  CARD  3  and 
CARD  5  can  be  any  alphabetic  name  up  to  six  characters  in  length.   The 
m  and  n  in  CARD  5  are  each  an  explicit  constant,  i.e.,  the  actual  constant 
value  itself.   The  b  in  CARDS  3,  h   and  5  is  a  blank. 

Estimates  of  Execution  Time  and  Execution  Pages  Out 
100  observations  (m)  over  20  variables  (n) 

1.1  mins.  8  pages 

100  observations  (m)  over  50  variables  (n) 

1.5  mins.  16  pages 

100  observations  (m)  over  ^6   variables  (n) 

2.0  mins.  20  pages 

100  observations  (m)  over  97  variables  (n) 

2.3  mins.  Ul  pages 

100  observations  (m)  over  98  variables  (n) 

2.5  mins.  Ul  pages 

100  observations  (m)  over  99  variables  (n) 

2.8  mins.  ^2  pages 
1000  observations  (m)  over  99  variables  (n) 

5.2  mins.  U2  pages 
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S-S-'+'l'So  Basic  Matrix  Operations 

BASMAX  is  an  operator  which  causes  matrix  multiplication  to  be 
performed. 

1.  Two  matrices  are  multiplied:  k,        >,  x  B/    ->  (m,n,p  <  lOO). 

2.  A  standard  format  for  printed  output  is  used.   Results  consist 
of  the  result  matrix  C,        \  in  floating  point  format  with  eight  digits  to 
the  left  of  the  decimal  point. 

3.  The  input  deck  submitted  must  conform  to  the  following: 

Col.  1      Col.  8 

CARD  1  Problem  Run  Card  (Standard  DCL  ID  Card)   ■-.•' 

CARD  2  $  STATM0N  _  _ 

CARD  3  *  F0RMATb * 

FORMAT  is  FORTRAN  format  for  one  rwo  of  data,  with 
the  exception  that  the  format  string  should  not 
be  enclosed  in  parentheses. 

*  DATAbA3b(m,n)  where  m  is  the  number  of  rows  and 
n  is  the  number  of  columns  as  indicated  by  the 
F0RMAT  card,  CARD  3- 

!  ■,     Data  A,  where  k  is  the  number  of  cards  per  row 
and  m  is  the  number  of  rows. 

*  .       F0RMATb * 

This  F0RMAT  applies  to  matrix  B.   See  CARD  3 
above  for  restriction. 
CARD    km+6      *  DATAbB3b(n,p)  where  n   is  the  number  of  rows  and 

p   is  the  number  of  columns  as  indicated  by  the 
F0RMAT  card,  CARD  km+5. 


CARD  h 


CARDS  5 
through  km+4 
CARD    km+5 


CARD    km+T 
through  k  n+km+6 

CARD    k-^n+km+T 


Data  B,  where  k,  is  the  number  of  cards  per  row 
and  n   is  the  number  of  rows. 
Col.  16  ^   , 

A*B=C 

(No  spacing  permitted  between  col.  16 
and  end  of  RESULT  name). 
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Condition  Bl  (m>n,p  <  lOO)  will  eventually  be  changed  to  allow  for  larger 
limits.   Condition  B2  will  eventually  be  latered  to  allow  user  control  of 
format  for  output  results.   A  and  B  used  in  CARDS  h,      km+6,  and 
k-,n+km+7  can  be  any  alphabetic  name  up  to  six  characters  in  length.   The 
m  ,   n   ,   and  p  in  CARDS  k   and  km+6  are  each  an  explicit  constant,  i.e., 
the  actual  constant  value  itself.   The  b  in  CARDS  3^  ^}   km+5  and  km+6  is 
a  blank. 

Estimates  of  Execution  Time  and  Execution  Pages  Out 

^(100,  100)  *   ^(100,  20)  "  ^(100,  20) 
1.8  mins.      9  pages 

^(100,  50)  ""  ^(50,  ^3)  =  ^(100,  ^3) 
2.0  mins.     ih   pages 

^(100,  100)  *   ^(100,  50)  "  ^(100,  50) 
2.k   mins.     l8  pages 

^(100,  100)   ^(100,  100)  "  ^(100,  100) 
3-0  mins.     2k   pages 

3.3.i+.2.  The  IBM  65O  Simulator  (SIM650) 

This  routine,  SIM65O,  will  simulate  on  an  IBM  709U,  an  IBM  65O' 
with  the  following  features : 

1.  A  2000  word  drum,  3  magnetic  tape  units,  I.  A.  S. ,  and  3  index 
registers. 

2.  A  card  reader-punch  (533)  attached  to  Area  1  using  one  of  the 
Digital  Computer  Laboratory  Panels:  Standard  Wo.  1,  SALT,  or 
Graduate  College. 

3.  A  printer  (^07)  attached  to  Area  2  using  one  of  the  Digital 
Computer  Laboratory  Panels:   Standard  Wo.  2,  SALT,  or 
Graduate  College. 

A  very  limited  number  of  65O  programs  run  by  SIM65O  on  the  709^+ 
seem  to  indicate  that  the  actual  execution  time  exclusive  of  card  reading 
and  on-line  printing  is  roughly  the  same  as  on  an  IBM  65O.   Therefore  old 
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input-output  time  must  be  subtracted  from  the  old  65O  time  estimate. 

The  interested  user  is  referred  to  the  detailed  program  description 
"IBM  650  Simulator  on  709^-1^+01  System  (SIM650) -Library  Routine  ^0-UOI-S650-25-BX" 
available  from  the  Librarian  in  Room  I65,  ERL. 
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3-^.  Summary  of  Available  Publications  Pei-taining  to  PORTHOS  and  its  Parts 
The  Digital  Computer  Laboratory  has  published  several  documents 

describing  the  software  facilities  available  to  the  user  at  the  University 

of  Illinois.   In  addition^  manufacturers'  publications  are  also  available. 

A  siimmary  list  of  available  user's  manuals  appear  below;  those  locally -isTitten 

items  are  marked  by  (DCL). 

All  the  listed  items  except  those  marked  by  an  asterisk,  *,  are 

available  from  the  librarian,  Room  l65j  ERL,  as  are  individual  publications 

concerning  the  library  subroutines  abstracted  in  section  5' 


7094 


PORTHOS 


"IBM  709^+  Principles  of  Operation",  IBM  Publication  A22-6703-I 


"The  PORTHOS  Executive  System  for  the  IBM  709U,  User's  Manual"  (DCL) 


FORTRAN  II 


"IBM  7090/709^+   Programming  Systems,    FORTRAN  II  Pi-ogramming", 
IBM  publication  C28-605U-I+ 


SCATRE 


"SCATRE,  University  of  Illinois  SCAT-Compatible  Assembler, 
Translator,  Relocatable  for  Lhe  IBM  709O",  W.  A.  Wulf, 
Library  Routine  LI-UOI-SCRE-I9-BX 


(DCL) 


SCAT 


"SCAT,  SHARE-Compiler-Assembler-Translator,  Symbolic  Assembly 
Program  for  the  IBM  709O",  Library  Routine  Ll-UOI-SSAl-1-BX    (DCL) 


ALGOL -60 


"User's  Manual  for  the  ALCOR-University  of  Illinois  ALGOL-60 
Translator",  E.  L.  Murphree  Jr. 

"Structure  and  Use  of  ALGOL-60",  H.  Bottenbruck 
(Reprints  available  at  Room  165  ERL) 


(DCL) 
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MAD 

"A  User's  Reference  Manual  for  the  Michigan  Algorithm  Decoder 

(mad)  for  the  IBM  709O",  R.  and  J.  Flenner, 

Library  Routine  L2-U0I-MAD1-2-BX  (DCL) 

*"A  Computer  Primer  for  the  MAD  Language";,  E.  I.  Organick 

*"The  Language  of  Compilers",  B.  A.  Caller,  McGram-Hill 
Book  Company,  Inc.  New  York,  I962 

All  the  applicable  user's  documentation  is  kept  current  by  the 
distribution  of  replacement  sheets  for  the  manuals  produced  by  the  Laboratory 
and  by  addenda  to  the  others.   These  replacement  sheets  are  distributed  as  a 
part  of  the  Digital  Computer  Laboratory  Bulletins,  which  also  contain 
information  of  a  more  ephemeral  nature,  such  as  announcements  of  holiday 
schedules,  planned  changes  to  PORTHOS,  etc.   The  Bulletins  are  mailed  to 
every  person  on  the  Digital  Computer  Laboratory  mailing  list.   Additions 
to  the  subroutine  library  are  dociimented  in  a  standard  form  (see  section  5) 
and  the  documentation  mailed  to  those  on  the  mailing  list.  Any  user  may 
have  his  name  placed  on  the  mailing  list  by  request  to  the  Librarian, 
Room  165,  ERL. 
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h.      Running  a  Job  on  the  709^ 
^.1.   General 

It  should  be  obvious  even  to  the  most  casual  observer  that  a  potential 
user  cannot  approach  the  computer  and  shout  out^  as  to  the  Oracle  of  Delphi, 
his  question,  and  have  in  short  order  a  detailed  answer  in  three  typewritten 
copies  (the  writer  has  experienced  at  least  one  occasion  when  a  visitor  actually 
faced  the  machine  and  spoke  to  it  as  if  it  were  capable  of  understanding.')* 
Desirable  though  this  personal  approach  to  problem  solving  may  be,  technology 
has  not  reached  that  point  of  sophistication,  and  more  prosaic  procedures  to 
employing  the  computer  in  problem  solving  must  be  followed.   Every  computer 
installation  has  associated  with  it  a  group  of  people  and  a  set  of  reasons  for 
its  existence  and  these  two  ultimately  impose  certain  rules  for  use  of  the 
machine.   In  many  cases,  the  user  may  simply  turn  on  the  power  to  the  computer 
and  operate  it  himself  without  regard  to  efficiency  of  use;  in  most  cases, 
however,  this  complete  freedom  cannot  be  justified,  and  varying  degrees  of 
constraint  on  the  individual  must  exist,  so  as  to  raise  efficiency  and 
accessibility  to  all  to  an  acceptable  level.   In  some  cases,  the  user  never 
actually  has  access  to  the  hardware  itself,  but  communicates  with  it  through 
the  operating  personnel.   Such  is  the  case  at  this  installation. 

The  computer  is  under  control  of  certain  "monitoring"  or  "executive" 
programs,  which  decide  what  is  to  be  done  next,  keep  records  on  what  has  been 
done,  instruct  the  human  operator  to  do  those  things  which  the  computer  cannot 
do  for  itself  (e.g.  mounting  tape  reels  on  the  tape  drives)  and  in  general, 
promote  efficiency  in  the  utilization  of  the  available  hardware.   There  are 
certain  procedures  which  the  user  must  follow  in  order  for  the  computer,  under 
control  of  the  executive  program,  to  be  able  to  recognize  his  program  and  process 
it  properly.   It  is  the  purpose  of  this  chapter  to  describe  and  specify,  and  to 
some  extent  justify,  the  precise  way  to  submit  a  job  to  be  run  on  the  709^-1^01 
installation  at  the  University  of  Illinois,  under  the  control  of  the  PORTHOS 
Executive" system.   It  does  not  attempt  to  do  anything  else,  and  the  instructions 
following  may  or  may  not  apply  elsewhere. 
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k.2.      Jobs  Run  Under  System  Control 
^.2.1.   General 

The  rapid  growth  of  computing  in  the  last  decade  has  been  promoted  in 
part  by  the  enthusiasm  with  which  programming  efforts  have  been  shared.   The 
very  name  of  the  best  known  of  the  several  organizations  devoted  to  the  disseminatio 
of  programs  and  programming  information,  SHARE  implies  the  prominence  deserved  by 
this  concept  of  avoiding  repetitious  programming  in  the  scheme  of  things  today. 
Most  well-run  computer  facilities  encourage  the  interchange  of  programs  between 
its  users  and  others.   Unavoidably^  many  of  the  programs  thus  obtained  ;, 
though  originally  written  for  a  compatible  hardware  configuration,  are  not 
completely  compatible  with  the  requirements  of  the  PORTHOS  system,  and  hence 
must  undergo  alteration  prior  to  their  submission  for  running  under  PORTHOS 
control.   Extensive  revision  is,  at  times,  undesirable,  particularly  if  only  a 
few  runs  are  anticipated,  and  to  avoid  such  an  imposition  on  the  user,  the 
Laboratory  has  provided  for  non-system  (or  "relinquish")  use  of  the  machines. 
Such  use  is  abnormal  and  requires  special  permission.   Instructions  for 
non-system  runs  may  be  found  in  section  h.3- 

A  minority  of  users  will  have  special  requirements  such  as  extra 
copies  of  output,  mounting  and  unmounting  of  special  tapes,  use  of  the 
cathode  ray  tube,  the  disk  file,  etc;  instructions  on  how  to  use  these 
facilities  are  also  included  in  this  chapter- 

The  majority  of  users  will,  however,  desire  no  special  privileges  and 
will  simply  want  to  submit  to  the  computer  their  problems  in  as  simple  a 
form  as  possible  and  have  their  output  as  quickly  as  possible.   The  system 
is  set  up  to  accommodate  the  wide  range  of  demands  imposed  by  users.   The 
instructions  for  normal  use  of  the  facility  follow  in  section  i|.2. 

The  following  is  a  step-by-step  description  of  the  procedure  to 
follow  in  preparing  a  normal  job  for  the  709^.   Included,  too,  is  a  description 
of  the  path  taken  by  the  job  after  it  leaves  the  user's  hands.   The  reader 
is  cautioned  that  much  of  this  material  is  of  an  ephemeral  nature  and  that 
he  should  be  extremely  careful  that  his  manual  is  kept  up-to-date.   A  minimum 
amount  of  redundancy  exists  in  the  system  (that  is,  the  system-in-the-large) 
and  non-attention  to  important  details  can  cause  needless  frustration  and  delay. 
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^.2.2.   Preparing  the  Job 

4.2.2.1.   The  Problem  Run  Card 

Each  job  which  is  to  be  run  under  PORTHOS  system  control  must  include 
as  the  first  card  a  card  of  very  special  format  -  the  Problem  Run  (or  identificatic 
or  ID)  card.   This  card  accompanies  the  Job  through  the  lUol  where  the  job  is  put 
on  magnetic  tape,  in  preparation  for  processing  by  the  709^.   It  is  very 
important  for  the  Problem  Run  card  to  be  correctly  punched.   Certain  programs 
within  the  system  (the  MONITOR)  scan  the  card  image  prior  to  processing  and; 
if  inconsistencies  are  detected,  reject  the  job;  appropriate  error  messages  such  as 

ILLEGAL  ID  CARD 
are  output  for  the  offending  job. 

For  ease  in  "batching"  jobs  of  similar  length,  several  categories  have 
been  established.   It  is  important  to  the  user  that  he  place  his  job  within 
the  proper  category;  it  is  to  his  advantage  to  get  the  lowest  numbered  category 
possible  for  his  job,  since,  generally  speaking,  the  lower  the  category  number, 
the  shorter  the  turn-around  time.   Categories  are  discussed  in  detail  in  section 
4.2.3.         '  •  '     ; 

Aside  from  categories,  which  are  based  primarily  on  amount  of  computer 
time  required,  there  is  a  broader  breakdown  of  jobs:   those  which  involve  a 
translation,  e.g.,  programs  written  and  submitted  in  FORTRAN,  SCATRE,  MAD,  and   ,  .■ 
those  which  do  not,  i.e.,  all  input  is  in  binary  form  (except  possibly  data).   •:  \ 
These  classifications  are  important  to  the  user  because  certain 
restrictions  prevail  if  a  translation  is  involved.   Such  a  job  is  termed  a 
"codecheck"  and  the  following  limitations  must  be  observed  on  the  ID  cards: 

a)  Execution  time  estimate  must  not  exceed  003  minutes 

b)  Execution  time  page  output  estimate  must  not  exceed  OO3O. 
A  program  involving  translation  which  exceeds  these  estimates 

will  be  allov^ed  to  translate  but  not  allowed  to  load  or  execute. 

An  ID  card  is  shown  below.   The  information  punched  into  each  ID 
card  must  conform  strictly  to  the  schedule  shown  in  Table  4.1. 
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Table  k.l. 
Problem  Run  (ID)  Card  Format 

Cols.  Contents 

1  Must  be  blank 

2-6  Problem  Specification  number         "'      '    ' 

7-2U  Name  of  user 

25  "C"  (for  Codecheck)  or  "P"  (for  production) 

26-35         Not  used 
36-38  Total  Run  Time  (must  be  punched).  Column  36  contains  the  number 

of  hours,   Column  37  and  38  contain  the  number  of  minut e s . 
39  Not  used 

4O-U2         Execution  run  time  estimate'**' 

Column  ^0  contains  the  number  of  hours,  columns  kl   and  U2 

contain  the  number  of  minutes. 
U3_li4         Must  be  blank 

^5-^8         Execution-time  page  output  estimate* 
^4-9-50  Must  be  blank 

5I-5U         Execution-time  punched  card  output  estimate* 
55-60         Department,  punched  left-Justified  as  it  appeared  on 

Problem  Specification  form   (See  Appendix  2) 
61-63  Course  number    (if  any) 

6^1-65  Section  number    (if  any) 

66-67  Problem  niimber    (if  any) 

68-80  Not  used  '  "       ■ 

*These  fields  must  be  either  entirely  punched  or  entirely  blank. 
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U.2.2.2.   The  Comments  Cards  and  Mounting  of  Tapes 

This  class  of  cards  forms  an  important  part  of  the  executive  system, 
and  is  provided  to  enable  the  user  to  send  messages  concerning  the  operation  of 
his  program  to  the  computer  operator  via  the  on-line  printer.   Irrelevant 
comments  only  waste  valuable  computer  time  and,  of  course,  should  be  avoided. 

These  cards  are  identified  by  the  $  sign  in  both  columns  1  and  2; 
hence  they  are  commonly  called  "double  dollar  comment  cards".   Except  for 
the  $$  in  columns  1  and  2,  there  is  no  restriction  on  what  symbols  can  appear  on 
the  $$  comment  cards;  the  string  of  symbols  cannot,  however,  extend  past 
column  72. 

For  the  special  case  where  the  user  has  received  permission  on  his 

Problem  Specification  to  have  reserved  tapes  mounted  on  the  709^  during  the 

execution  of  his  program,  a  special  $$  comments  card  form  has  been  devised. 

Adherence  to  the  suggested  format  will  accomplish  the  purpose  with  a 

minimum  of  inefficiency.   This  particular  $$  control  card  is  called  a 

SAVEMjZiUNT  card,  and  it  should  appear  immediately  after  the  problem  Run  card. 

The  card  format  is 

Col:   12    8      l6   17  72 

$$    SAVEM0UNT    |   variable  field   | 

where  the  variable  field  contains  two  parameters  for  each  tape  to  be  mounted, 
the  parameters  being  separated  by  a  comma.   The  first  parameter 
of  each  pair  is  a  6-character  tape  label  number  (the  label  number  of  the 
tape  assigned  to  the  user)  of  which  the  first  character  will  be  D,  L,  or 
jZ5.   The  second  parameter  will  be  a  logical  tape  number,  normally 
2,  3^  ^}    9   or  10.   Any  number  of  $$  SAVEM0UNT  cards  may  be  included. 
Following  these  should  be  a  card  containing 
Col:    1    2 

$    HALT 
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This  card  will  cause  the  709^+  to  stop,  allowing  the  operator  time 
to  amount  the  proper  tapes. 
Example : 

1        2        3        U        5        6        7 
cols:  123U567890l23i+567890l23'+567890i23^567890l23^567890l23U567890l23i+567890l2 

$$  SAVEM0UWT  L2 002 1,9 
$$  SAVEM0UWT  L200il7,2 
$$    SAVEMjZJUNT  ^UOOOl^U 

$HALT 

The  above  is  safe  to  follow  only  if  the  job  does  not  include 
translation  (the  job  contains  binary  decks  only)  and  the  tape  used  is  not 
logical  tape  3;  nor  is  the  job  a  Ping-Pong  job  (See  section  ^.5)^  which 
usually  uses  logical  tape  2. 

If  translation  is  to  be  performed,  then  the 

$HAL.T 
card  should  be  omitted;  the  user's  program  should  contain  a  stop,  i.e., 

PAUSE  NO.n-  MAD  (n  =  unsigned  octal  number  up  to  k   digits 
HTR       -  SCATRE  and  SCAT 
PAUSE  n   -  F0RTRAW   (n  as  above) 
following  an  on-line  comment  instructing  the  operator  to  mount  the  tape,  which 
will   be  done   before  the  user's  program  accesses  the  unit  on  which  the  tape 
is  to  be  mounted. 

Decks  containing  the  $$  SAVEMjZSUNT  comment  card  must  also  include 
a  $  REM0VE  TAPES  control  card  in  the  first  group  of  $  control  cards  (see  section 
i+.2.2.3.10j. 

U.2.2.3.   The  Control  Cards 

U. 2. 2. 3.1.   General 

The  heart  of  the  PORTHOS  system  is  a  set  of  control  cards  wnich 
inform  the  system  what  action  must  be  taken  on  the  cards  which  follow, 
normally  the  input  cards  for  the  SCATRE  assembler  or  one  of  the  compilers, 
or  even  a  program  in  binary  form.   The  control  cards  allow  a  limited  amount 
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of  flexibility  in  the  action  taken;  for  example,  listing  of  compiler -generated 
object  programs  can  be  obtained  if  the  translation  was  successful,  but 
not  if  the  translation  was  unsuccessful,  if  this  arrangement  is  desired.   Control 
instructions  fall  into  several  categories,  which  are  discussed  below.   Several 
control  instructions  may  appear  on  the  same  control  card,  provided  the  instructions 
could  normally  be  grouped  together  but  with  each  on  a  separate  control  card.   The 
discussions  below  of  the  various  classes  of  control  instructions  clarify  the  m,eanin^ 
of  "normal  grouping".   The  string  of  instructions  may  not  extend  past  column  6k, 
for  reasons  v;hich  are  explained  in  the  following  section.   _       ■. 

All  the  control  cards  are  characterized  by  the  $  sign  in  column  1  and 
no  $  sign  in  column  2,  and  for  this  reason  are  most  often  referred  to  as  "$ 
control  cards". 

Table  4.2  and  Appendix  9  a-re  summaries  of  the  meanings  of  the  $  control 
cards. 

U. 2. 2. 3.2.   Identification  of  Binary  Cards 

All  binary  cards  generated  by  translators  within  the  system  will  contain 
the  Problem  Specification  number  obtained  from  the  ID  card  in  columns  73-77  and  a 
sequence  number  in  columns  78-80*   This  standard  binary  ID  may  be  changed  in  one 
of  the  following  ways. 

If  binary  cards  are  a  product  of  a  translation,  it  may  be  desirable  for 
the  user  to  identify  them  in  some  way.   This  is  facilitated  by  the  use  of  columns 
65-72  of  control  cards,  which  may  contain  any  BCD  characters,  at  least  the  last 
three  of  which  (columns  70-72)  should  be  numeric;  this  information  will  appear  in 
the  identification  columns  of  the  binary  cards  produced.   Each  such  identification 
supersedes  any  earlier  one.   Thus,  binary  decks  would  then  contain  in  coliimns  73-77 
the  characters  vfhich  appeared  in  columns  65-69  of  the  control  card,  and  columns 
78-80  of  the  binary  deck  would  contain  a  sequence  number,  starting  with  the  digits 
which  appeared  in  columns  70-72  of  the  control  card. 

In  addition,  in  a  SCATHE  program,  the  identification  can  be  altered 

within  the  program  by  the  use  of  the  SCATRE  pseudo -operation  KEWID 

operation    .     ..   variable  field 
KEWID        "  "■     XXXXXMW 
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where  the  XXXXX  represents  a  5-character  new  identification  field  and  the 
MM  represents  a  3-digit  numeric  field.  .The  SCATRE  assembler,  on 
encountering  such  an  instruction,  replaces  the  current  object  program 
binary  deck  identification  by  the  5  characters  XXXXX.   On  .the  binary  cards 
generated  from  the  cards  following  the  EEWID  pseudo-operation,  the  sequence 
number  begins  with  MN+1  and  is  incremented  by  one  for  each  binary  card 
produced.   This  sequencing  scheme  is  not,  however,  true  for  the  program 
card  for  a  relocatable  binary  deck. 

For  example,  suppose  that  the  following  SCATRE  program  is  assembled 
and  a  binary  object  deck  is  produced. 


Col.  1 

$SCATRE 

$PiINCH  0BJECT 


65 


72 


EEWII7 
THING020 


SCATRE 

program 
part  I 

NEWID  L0GIC25O 
SCATRE 

program 
part  II 


$DATA 

data 

cards 

By  the  rules  stated  above,  the  $SCATRE  card  causes  no  binary  deck 
identification  field  to  be  set  up;  the  $GjZi  card  does,  however,  cause  the 
identification  field  NEWll?  to  be  set  up.   The  $RmCH  0BJECT  card  causes 
the    NEWII7    identification  field  to  be  completely  replaced  by  THING020. 
The  binary  cards  generated  from  the  following  SCATRE  program,  part  I,  bear  the 
characters  THING  in  columns  73-77  and  each  card  is  numbered  sequentially 
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in  columns  78-8O;,  beginning  with  020,   At  this  point;,  the  SCATRE  card 
bearing  the  pseudo-operation 

WEWID  L0GIC  250 
appears.   From  this  point  on,  each  binary  card  will  have  L0GIC  in  columns 
13-11 >    and  will  be  numbered,  sequentially  in  columns  78-80,  starting  with 

251. 

Of  course,  the  KEWID  card  has  this  effect  only  if  the  object  deck 
is  requested.   In  any  event,  the  NEWID  card  image  is  not  printed  in  the  listing 
of  the  program.  (See  the  SCATRE  manual  for  a  detailed  description  of  the 
NEWID  pseudo-operation. )  — ■ 

4. 2. 2.3. 3-   Translator  Selection 

There  are  currently  four  transl-:  ;  ,j.  programs  which  may  be 
called  by  $  control  cards:   one  relocatable  assembler,  SCATRE>  and  three 
algebraic  compilers,  MAD,  FjZ^RTRAN,  and  ALG0L.   The  control  instructions 
corresponding  to  each  are 

$  SCATRE 

$  MAD 

$  F0RTRAN 

$  ALGjZ^L 
Each  such  instruction  causes  the  Monitor   program  to  call  from  the  master  tape 
into  core  the  proper  translating  program  and  to  transfer  control  to  it. 
The  translating  program  then  proceeds  to  read  from  the  input  tape  the  source 
program  in  the  appropriate  language;  i.e.,  SCATRE,  MAD,  F0R'IRAW,  or  ALG^L, 
depending  upon  which  $  control  instruction  was  encountered.   Note  carefully 
here  that  these  control  instructions  are  mutually  exclusive;  that  is, 
it  vrould  be  senseless  to  place  two  of  the  instructions  together,  either  on 
separate  cards  or  on  the  same  card,  as 

$  MAD,  ALG0L 

for  this  implies  that  both  the  MAD  compiler  and  the  ALG0L  compiler  should  be 
called  to  process  the  following  program,  and  this  is  not  possible.   This  is 
not  meant  to  imply,  of  course,  that  more  than  one  such  control  instruction 

I 
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cannot  be  used  in  a  single  job.   On  the  contrary,  this  is  a  very  powerful 
and  useful  feature  of  the  control  instruction  scheme.   For  instance,  it 
makes  perfectly  good  sense  to  write  a  program  in  F0RTRM  and  subroutines 
for  it  in  SCATRE.   In  such  a  case,  a  $  FORTRAN  card  will  appear  Just  before 
the  FORTRAN  statements  and  a  $  SCATRE  card  will  appear  just  before  the  SCATRE 
instructions.   Each  range  of  control  is  unambiguously  defined  in  this  case; 
but  if,  instead, 

$  FORTRAN,  SCATRE 
appeared,  instructions  for  processing  the  job  are  ambiguous. 

^.2.2.3-^-   Binary  Cards  as  Input 

It  frequently  happens  that  a  part  or  the  whole  of  a  user's  job 
will  be  in  column  binary  form  (see  section  4.2.5.^.   In  this  case,  he  has 
the  option  of  notifying  the  system  whether  the  cards  which  follow  are  in  column 
binary  form  or  not.   This  is  done  by  preceding  the  binary  cards  with  a 

$  BINARY 
control  card.   A  thorough  understanding  of  the  action  this  control  instruction 
causes  will  enable  the  user  to  decide  whether  to  use  it  in  a  given  case. 

During  a  normal  translation  of  one  of  the  source  languages 
mentioned  in  section   3.3.,    binary  card  images  are  generated  and  placed 
on  the  execution  tape.   When  a  column  binary  card  (not  a  $  BINARY  control  card)  i 
encountered  by  the  Monitor,  the  image  of  the  card  is  placed  on  the  execution  tape 
following  the  generated  images.   If  after  binary  card  images  are  encountered  and 
placed  on  the  execution  tape,  calls  for  translation  of  a  source  language 
(not  binary)  are  encountered,  the  appropriate  translators  are  brought  into 
core,  translations  are  made,  and  the  generated  binary  card  images  placed  on 
the  execution  tape  following  the  previously  transferred  binary  card  images. 
This  process  continues  until  the  entire  job  is  in  binary  form  on  the  execution 
tape.   When  all  translations  have  been  completed  and  are  successful,  and  if 
execution  of  the  job  is  indicated,   control  is  passed  to  the  Loader  (see  section 
3.2.4,),  which  proceeds  to  load  the  binary  images  into  the  proper  locations  in 
core  from  the  execution  tape. 
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If^  instead  of  a  binary  card  image,  a  $  BINARY  card  image  is 
encountered,  then  a  binary  transition  card  (see  section  U.2.2.3>9)  is  generated 
and  placed  on  the  execution  tape,  and  control  is  passed  to  the  Loader  as 
before,  which  loads  into  core  the  binary  card  images  on  the  execution  tape. 
Then,  when  the  binary  transition  card  is  encountered,  the  Loader  begins  loading 
into  core  from  the  input  tape,  which  contains  the  binary  card  images  that  follow 
the  $  BINARY  control  card. 

After  the  Loader  has  finished  loading  the  binary  card  images  into 
core,  control  passes  to  the  user's  program.   Consequently,  no  further  $ 
control  cards  have  meaning,  with  the  exception  of  a  $  DATA  card,  which 
immediately  precedes  the  user's  data,  if  any  (See  Section  U.  2. 2.3 .6,,). 
Consequently,  the  $  BINARY  control  card  can  only  be  present  in  a  user's  job 
if  there  are  no  cards  except  binary  cards  between  the  $  BINARY  control  card 
and  the  end  of  the  program  part  of  the  deck.   Only  the  $  DATA  card  and  the 
actual  data  cards  may  follow  the  binary  cards. 

Note  that  the  major  difference  in  action  vfith  and  without  the 
$  BINARY  control  card  is  that  without  the  $  BINARY  control  card,  all  the 
binary  card  images  are  transferred  from  the  input  tape  to  the  execution 
tape.   This  takes  a  certain  amount  of  time  to  do,  and  the  user  who  can 
group  all  or  any  of  his  binary  input  cards  right  in  front  of  his  data  (if  any) 
can  avoid  wasting  this  time  by  using  the  $  BINARY  control  card.   If  he  cannot 
so  group  his  binary  input  cards,  then  he  has  no  choice  in  the  matter:  he 
cannot  use  the  $  BINARY  control  card. 

^.2.2. 3- 5-   Punch  Binary  Cards 

If  the  user  desires  a  binary  deck  of  his  translated  source 
program,  then  he  may  so  indicate  by  placing  a  $  PUNCH  jZ^BJECT  control  card 
with  the  $  control  card  that  calls  for  one  of  the  translators  (MAD,  F0RTRAN, 
ALG0L,  or  SCATRE).   Then,  as  each  binary  card  im.age  is  generated  and  placed 
on  the  execution  tape  (see  section    3«2.3.  ),  the  same  image  is  placed  on 
the  output  tape,  to  be  punched  for  the  user  by  the  l401. 
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Note  that  only  generated  binary  card  images  are  placed  on  the 
output  tape.   Hence,  no  binary  input  cards  will  be  copied  on  the  output  tape. 

Note;,  too,  that  the  action  of  placing  the  images  on  the  output 
tape  is  taken  by  the  translator,  so  that  if  more  than  one  translator  (e.g., 
both  SCATRE  and  F0RTRM)  is  called  in  a  job,  $  PUNCH  jZ^BJECT  control  cards 
must  accompany  each  of  the  translator  calls  ($  SCATRE  and  $  F0RTRAI^)  if 
object  decks  are  desired  for  both. 

If  the  user  has  called  library  subroutines  which  are  on  the 
Library  Tape  (see  section  5),  he  may  obtain  binary  decks  of  these  called 
subroutines  by  placing  a  $  PUNCH  LIBRARY  control  card  in  the  first  group  of  $ 
control  cards.    At  loading  time,  as  the  subroutines  are  brought  in  from  the 
library  tape,  the  binary  card  images  are  placed  on  the  output  tape,  to  be 
punched  by  the  1^01.   Each  subroutine  thus  punched  will  have  its  own 
identification  punched  into  columns  73-80,  numbered  sequentially  in  the  last 
three  columns.   The  user  has  no  control  over  the  identification  field. 

i+.2.2.3-6.   Data 

When  the  user  desires  execution  of  his  job  and  data  form  a 

part  of  his  input,  a  $  DATA  control  card  must  immediately  precede  his  data 

cards.   If  no  data  exist,  then  this  control  card  is  not  required. 

U.2.2.3'7'   Program  Execution 

One  of  the  feattires  of  the  PORTHOS  Executive  System  is  the 
provision  for  execution  of  a  job  immediately  after  translation  is  complete. 
If  the  user  desires  execution  of  his  job,  he  must  place  a  $  GjZ5  control 
card  at  the  head  of  his  job.   Since  this  is  an  action  which  involves  the 
entire  job,  not  just  a  part  of  it  (as,  for  example,  the  translation  of  a 
subroutine),  a  $  GjZ!i  control  card  anyivhere  except  at  the  head  of  the  job 
has  no  meaning  and  is  ignored. 
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If  the  requirement  that  the  computer  be  halted  exists  in  a  Job, 
so  as,  for  example,  to  enable  the  operator  to  mount  or  dismount  tapes,  then 
this  may  be  done  by  placing  a  $  HALT  control  card  at  the  he  ad  of  the  job. 
Note  that  this  option  may  be  used  only  under  severely  restricted  conditions: 
the  $  HALT  control  card  must  be  immediately  preceded  by  a  $$  comment  card 
(See  Section  J4-.2.2.2*)'   The  $$  coimnent  card  must  instruct  the  operator  v/hat 
action  he  is  to  take,  and  if  no  $$  comment  cards  appear  immediately  before  the 
$  HALT  control  card  (no  card  of  any  kind  may  be  between  these  cards)  the 
request  for  a  halt  is  ignored. 

The  user  is  asked  to  use  the  $  HALT  control  instruction  with 
■-  iocretion  and  to  be  explicit  in  his  preceding  instructions  to  the  operator, 
so  tha,t  the  computer  v/ill  be  halted  a  minimum  length  of  time. 

Users  who  have  received  permission  on  the  Problem  Specification  form 
GO  obtain  more  than  one  copy  of  their  printed  output  should  include  a  $  C0PIES  (l 
control  card  in  their  decks;  N  is  the  number  of  copies  of  printed  output 
desired  and  must  be  less  than  or  equal  to  the  number  of  copies  approved  on  the 
Problem  Specification  form  which  in  turn  must  be  less  than  or  equal  to  63. 

The  user  may  have  a  $  C0PIES  (N)  control  card  with  any  of  the  other 
$  control  cards  in  his  job  and  he  will  receive  N  copies  of  following  output 
until  another  $  C0PIES  (N)  or  the  end  of  the  job  appears. 

For  example : 
The  $  Control  Card  group 

$  FjZ^RTRAW  G0,  PRINT  0BJECT 
$  C0PIES  (2) 
would  give  the  user  two  copies  of  all  printed  output  generated  by  FORTRAN  for 
the  source  deck  which  follov/s.   The  user  could  follow  this  with  a  SCATRE 
language  subroutine  preceded  by  the  $  control  instructions 

$  SCATRE,  PUNCH  jZ5BJECT,  COPIES  (l) 
and  receive  only  one  copy  of  the  SCATRE-generated  print  output.   If,  instead, 
the  SCATRE  subroutine  were  preceded  by  only  the  $  control  instructions 

$  SCATRE,  PUNCH  jZSfiJECT 
the  user  would  also  receive  two  copies  of  the  SCATRE-generated  print  output,  sine 
the  $  COPIES  (2)  from  the  FORTRAN  group  would  still  be  in  effect. 
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Similarly,  the  user  wanting  extra  copies  of  his  execution-time 
print  output  only  should  omit  the  $  COPIES  (N)  until  the  $  DATA  (or  $  BINARY) 
card;  e.g.,  the  $  control  instructions 

$  F}Z5RTRAN,  G0,  punch  jZ^BJECT 
(FORTRAN  Source  Deck) 
$  C0PIES  (2) 
$  DATA 

would  give  the  user  only  one  copy  of  his  FORTRAN-generated  output,  but  two 

copies  of  his  execution  results. 

The  Monitor  imposes  the  following  restrictions  on  multiple  copies: 

a)  An  unsuccessful  assembly  or  an  unsuccessful  translation 
will  cause  the  previous  request  for  more  than  one  copy  to  be 
ignored. 

b)  If  the  user  exits  via  SYSERR  and  obtains  a  dump,  a  previous 
request  for  multiple  copies  will  be  ignored. 

Example : 


Deck  Setup 
Problem  Run  Card 
$  SCATRE,  G0,  DUMP 
$  C0PIES  (2) 

(SCATRE  Source  Deck) 
$  F0RTRAW,  COPIES  (l),  PUECH  0BJECT 

(FORTRAN  Source  Deck) 
$  C0PIES  (3) 
$  MAD 

(mad  Source  Deck) 
$  COPIES  (^4) 
$  DATA 

(Data  Deck) 


Number  of  Copies 
of  Print  Output 


2  copies  of  SCATRE  listing 

1  copy  of  FORTRAN  listing  and  map 

3  copies  of  MAD  listing  and  map 


h   copies  of  Loader  map  and 
execution  results 
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U.2.2.3'8.   Program  Development  Aids 

To  this  category  of  control  instructions  belong 

$  PRINT  0BJECT 

$  DUMP 

$  1/0  DUMP 

$  FULL  DUMP 

$  LIBDUMP 

$  CLEANUP 
We  consider  each  in  turn. 

The  $  PRINT  JZ^BJECT  control  instruction  causes  a  compiled  object  prograrr 
to  be  listed  in  symbolic  instruction  form.   This  feature  is  meaningless  for 
a  SCATRE  assembly,  since  the  listing  of  the  SCATRE  source  program  which  the 
user  automatically  gets  is_  the  symbolic  object  program;  it  is  not  operable  for 
ALGOL  because  no  symbolic  object  program  is  generated  during  compilation  of '  an 
ALGOL  source  program.   It  is  meaningful  for  MAD  and  FORTRAN  compilations 
since  both  can  generate  symbolic  object  programs  during  compilation.   Within 
each  Job,  the  $  PRINT  0BJECT  control  instruction  must  appear  grouped  with  the 
translator  calls  ($  MAD  or  $  FjZ^RTRAN)  and  applies  only  to  the  cm-rent  translation 
For  example,  if  a  Job  consists  of  two  FORTRAN  source  programs  separated  by  a 
SCATRE  program,  and  the  $  PRINT  0BJECT  control  instruction  appears  only  with  the 
first  $  FJZ5rTRAN  control  instruction,  the  object  program  generated  from  the 
second  Fortran  source  program  is  not  printed  on  the  output.   To  get  a  listing 
of  it,  a  second  $  PRINT  0BJECT  control  instruction  grouped  with  the  second 
$  FORTRAN  control  instruction  would  be  necessary. 

The  $  DUMP  control  instruction  causes  a  portion  of  the  contents  of 
core  to  be  written  on  the  output  tape  if  the  program  is  terminated  via  the 
subroutine  SYSERR  (see  Appendix  10).   Under  normal  conditions,  those  locations 
in  core  containing  the  user's  main  program  and  Erasable  storage  (see  section 
3-.2.i|-J.  )  will  be  output.  If  a  Ping-pong  (or  multiple  core-load)  job  is  involved, 
the  output  will  consist  only  of  the  core  contents  at  the  time  of  termination. 
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Under  some  circumstances,  the  user  may  feel  that  he  needs  a  dump  of 
the  entire  core.   After  he  has  discussed  the  need  with  a  consultant  (see  section 
1.2.1)  and  has  obtained  a  Special  Permission  Card  appropriately  filled  out  and 
signed  by  a  consultant,  he  may  use  a  $  FULL  DUMP  card  with  his  input  deck.   The 
Special  Permission  Card  must  accompany  his  deck  when  submitted  at  the  Routing 
Room.   The  Special  Permission  Card  is  valid  for  only  one  job;  if  further  full 
dumps  are  required,  special  permission  must  be  sought  for  each.   $  FULL  DUMP, 
like  $  DUMP,  is  valid  only  if  termination  is  via  SYSERR   (see   Appendix  lO) 

If  the  user  requires  a  dump  of  the  subroutines  called  from  the 
library  tape,  in  addition  to  the  dump  he  would  get  from  a  $  DUMP  control  card, 
he  must  use  a  $  LIBDUMP  control  card. 

The  $  LIBDUMP  is  valid  only  if  termination  is  via  SYSERR. 

The  input/output  routines  are  common  to  (and,  therefore,  separate  from) 
all  the  programming  systems  available  through  PORTHOS.   Hence,  if  an  error  is 
detected  by  the  l/O  routines  during  input  or  output  of  data   (such  as,  for 
example,  an  irreconcilable  inconsistency  between  a  format  statement  and  a 
corresponding  data  field)  the  user  cannot  expect  execution  to  continue,  nor  can 
he  expect  the  job  to  terminate  via  SYSERR,  even  though  he  has  programmed  the 
main  part  of  his  program  to  do  so.   To  provide  the  needed  linkage,  he  must  include 
both  a  $  1/0  DUMP  control  card  and  one  of  the  other  dump  control  cards: 

$  DUMP,  $  FULL  DUMP,  or  $  LIBDUMP. 

The  user  must  place  any  dump  control  cards  in  the  group  at  the  head  of 
the  job.   That  is,  the  dumps  requested  apply  to  the  entire  job,  and  not  to  only 
a  part  of  it . 

Output  of  a  dump  is  invariably  of  the  same  format : 
location     word  word    word    word    word    word    word    word 
of  word  #n       #n    #n+l    #n+2    #n+3    #n+k  #n+5    #n+6    #n+7 

All  numbers  are  in  octal  form.   If  an  entire  line  of  8  words  consists  of  words 
all  identical  to  the  last  word  of  the  preceding  line,  and  the  first  word  of 
the  succeeding  line,  the  line  is  not  printed.   A  single  line  of  dots  indicates 
that  a  block  of  such  identical  words  has  been  omitted  from  the  print-out. 
In  the  case  of  absolute  programs  $  DUMP  dumps  the  region  of  core  from  SYSj^^RG 
(now  lOOOOp  but  subject  to  change)  to  the  high- 
est numerical  location  used  by  the  program. 
LIBDUMP  dumps  the  region  from  SYSjZiRG  through 
11111 p'      As  in  all  cases,  to  obtain  a  dump  from 
one  of  the  dump  control  cards,  the  program  must  be 
terminated  via  SYSERR  or  by  operator  intervention. 
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SYSCUP  is  a  system  execution  coordination  routine  which  is  designed 
to  allow  the  user  to  regain  control  of  the  computer  for  a  limited  period  of  time 
after  his  job  has  been  terminated  via  SYSERR  or  by  operator  intervention,  in 
order  to  permit  his  program  to  make  a  more  graceful  termination,  if  possible. 
If  SYSCUP  is  used,  then  the  control  card  $  CLEAN  UP  must  appear  in  the  first 
group  of  $  control  cards  for  the  Job.   The  action  and  use  of  SYSCUP  is 
described  in  section  6 .2. 9. 3- 

U.2.2.3.9.   The  Control  Card  for  Multiple-Core  Jobs 

The  user  who  has  a  job  of  such  magnitude  that  more  than  one  core-load 
of  instructions  is  necessary  must  mark  the  ends  of  all  the  core-loads  with 
$  BREAK  control  cards.   The  general  form  of  this  control  card  is 

$  BREAK  (n) 
where  n  is  a  logical  tape  niimber.   The  interested  reader  should  see  section 
h.2o6,   The  Multiple  Core-Load  Job:   Ping-Pong,  for  a  complete  discussion  of 
this  feature  of  the  executive  system. 

U. 2. 2. 3.10.   The  $  REMOVE  TAPES  Control  Card 

Decks  containing  the  special  $$  SAVEM0URT  comment  card  (see  section 
i+.2.2.3)  must  also  include  a  $  REMjZ^VE  TAPES  control  card  in  the  first  group  of 
$  control  cards.   This  causes  the  computer  to  halt  at  the  end  of  the  run, 
with  appropriate  on-line  comments  (internally  generated),  to  allow  the  operator 
to  remove  the  reserved  tapes  specified  on  the  $$  SAVEMjZSUNT  card. 
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i+. 2. 2.  3.11.   $  Control  Card  Summary 

Those  which  are  underlined  below  pertain  to  the  execution  phase^, 
and  must  appear,  if  used,  in  the  first  group  of  $  control  cards  in  the  job  deck. 


SCATRE 
MAD 

FORTRAN 
ALGjZiL 


Assemble  the  SCATRE  program  that  follows. 
Compile  the  MAD  program  that  follows. 
Compile  the  FORTRAN  program  that  follows. 
Compile  the  ALG)Z5l  program  that  follows. 
Execute  the  instructions  compiled,  assembled,  or  read 
in  during  the  preprocessing  of  this  program.   (if  an 
error  occurs  during  the  preprocessing,  no  execution 
will  take  place). 

Defines  the  information  that  follows  this  card  to  be 
data.   This  must  always  precede  the  first  data  card. 
Dump  the  user '  s  prograjns  and  Erasable  in  case  of 
trouble  (other  than  input -output  trouble). 

Same  as  DUMP,  but  tape  library  routines  called  by  the  user 
are  dumped  as  well. 

Dump  all  of  core  in  case  of  trouble  (other  than 
input -output  trouble). 

Give  dump  as  indicated  even  if  input-output  trouble. 
(Must  be  accompanied  by  DUMP,  FULL  DUMP  or  LIBDUMP). 
Print  the  object  program  that  results  from  the  current 
MAD  or  FORTRAN  translation. 

Punch,  in  column  binary  form,  the  object  program  generated 
by  the  current  $  MAD,  $  FORTRAN,  $  SCATRE,  or  $  ALG0L. 
PUNCH  LIBRARY  Punch,  in  column   binary,  each  library  subroutine  brought  in 
from  the  system  tape  at  execution  time  for  use  by  the  program. 
Each  subroutine  thus  piinched  will  have  its  own  identification 
information  in  columns  73-80. 


DATA 
DUMP 
LIBDUMP 
FULL  DUMP 
1/0  DUMP 
PRINT  0BJECT 
PUNCH  0BJECT 


Table  U.2. 
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HSEM:(S)  Marks  the  end.  of  each  core-load  in  a  imltiple-core  load  job. 

13ie  parameter  S  refers  zo  a  logical  tape  imit. 
BMSMT  Indicates  that  all    cards  fcllowiiig  (wp  ■until  a  $  DATA-  card)" 

are  colitann  binary. 
0^?IES(®)  Causes  S  copies  of  the  outpiat  following  to  be  printed  until 

either  another  $  COPIES (M)  card  or  the  end  of  the  job  appears. 
{^.ysjFjp      Allows  the  user  to  regain  control  of  the  computer  for  a  short 

time  after  termination  iria  SYSERE  or  by  operator   intervention, 

throuigh  SrSCO?  subroutine. 
^EMcYE.  J!AI^,     Causes  the  ocai^uter  to  halt  at  the  end  of  the  job  for 

removal  of  user's  reserved  tapes. 
SJVLT  Stop  the  ccunputer  to  allow  the  operator  to  take  action 

indicated  on  coaanents  cards   ($  in  colimns  1  and  2).      This 

is  effective  only  if  comments  have  preceded. 
SSOMC  Use  the  Statistical  Services  Unit  package  of  statistical 

pro.gr  faff  ,s. 
S]iyg|.503j  "[jse  the  Statistical  Monitor  package  of  statistical  programs. 
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Cnansre 


U.2.2.^.   Arrar.gement  of  the  input  Deck 


rz — c-,;ing  IS  a  aescriprion  of  the  arrangement  of  the  various  class 
of  cards  appearing  in  an  inpuu  deck.  Cer-ain  of  the  consnen-cs  celov  have  he; 
made  elsewhere^  and  are  repealed  here  as  resiiniers  ~o  ~he  user. 

a)  The  firs"  card  of  the  deck  inust  he  "he  Proclen  S".;n  Card  (see 
section  ^.2.2.1) 

b)  Folloiving  the  Probleni  Run  Card  aay  he  special  instrucuicn 
($$  Coimnent)  cards  (see  section  -.2.2. 2i)  used  to  infcm  the 
operator  of  any  special  or  -Jinusual  si-uauion  regarding  -Ghe 
handling  and/ or  processing  of  "he  .joo.   The-r  znarj   not  he 
included  in  the  deck  except  i:v::edia~el7  folloring  the  Prohlem 
Run  Card.   These  cards  nras-  have  a  dollar  sign  ($)  in  ho-h 


col'ucn  1  and  ccl'jnn  2. 

c)  Hex"  nus~  appear  ~he  S  control  card  or  cards.   These  cards  have 
a  dollar  sign  ($)  p^unched  in  col'jmn  1  only.   The  ir_fori:a~icn  on 
these  cards  informs  -he  sysxem  "rfhat  action  is  zc   he  ^aken  vrluh 
regard  oo  the  suhsequen~  cards  (see  sec-ion  -.2.2.3*). 

d)  Program  decks  foUcv  the  $  control  cards.   If  There  are  several 
portions  of  the  joh,  some  of  >fnich  for  exa2rple  are  uo  ce  assemcls 
by  SCATHE,,  o-hers  zc   "ce  Translated  hy  M4D  or  F^RTKAIi,  ezz.  ,    Then 
each  porTion  musT  he  preceded  'z-r   the  appropriaTe  $  conTrol  cards. 
Binary  cards  ma^-  he  inserTed  ^riThouT  a  ccnTrol  card  (see  sectior 
4.2.2.2).   HcTe  tr.aT  cerTain  conTrcl  insTrucTicns  apply  to  The 
execution  phase  of  The  ;'cc  raTher  Than  tc  any  parTicular  section 
of  the  program.   'These  include,,  among  OThers.  G-0,  DUI-IP.  LlBDu?-!?, 
l/0  DUf'EP,  and  FJITCH  LIBRARY.   S^-ich  conTrol  cards  musT  occ"ur  in 
the  fir ST  group  of  S  conTrol  cards.   If  They  occur  \ 
they  vrill  ce  ignored. 

e)  Data  cards,  if  arj-,-,  occur  lasT  in  The  .;'ch  deck  and  musx  he 
preceded  'zj-   a  S  DATA  control  card. 

An  illustration  of  a  T'.-oical  inr)UT  deck  anpears  as  Appendix  2. 
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U.2.2.5-   Listing  and  Reproducing  Cards  and  Tapes 

Occasionally,  the  user  requires  that  cards  be  reproduced  or  listed,  or 
that  magnetic  tapes  be  copied  or  listed  or  punched  into  cards.   All  these 
activities  are  done  on  the  lUol  computer,  and  a  special  form  (Figure  ^.3)  has 
been  devised  to  facilitate  them.   All  the  user  need  do  is  indicate  his  require- 
ments and  leave  the  form  and  his  input  (cards  or  tape)  at  the  Routing  Room, 
110a  ERL.   His  work  v;ill  be  completed  and  available  there. 

If  the  user  has  a  deck  of  less  than  1000  BCD  (not  binary)  cards,  and 
wishes  to  do  so,  he  may  use  the  519  Card  Reproducer  in  Room  I61  ERL  to  reproduce 
them.   There  is  also  available  in  that  room  an  Alphabetic  Interpreter,  but  no 
listing  machine  is  available  at  the  Digital  Computer  Laboratory. 

For  the  reproduction  of  decks,  a  rather  general  standard  lUoi  routine, 
RGCP  is  available.   An  abbreviated  writeup  of  this  routine  is  provided  in 
Appendix  12.   If  the  user  wishes  a  deck  to  be  reproduced  using  the  facilities 
in  this  routine,  the  words  "Use  RGCP"  should  be  written  on  the  application 
sheet  and  the  appropriate  control  cards  (as  described  in  Appendix  12)  provided. 
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DIGITAL  COMPUTER  LABORATORY 

Date 


Name 


Problem  Spec 
Department 


CARDS 


List 


Number  of  copies 
Reproduce 


Number   of  copies 


Type  of  card  to  use 
SPECIAL  COMMENTS 


Phone 


TAPE 


Copy  tape 


Label  on  reel  of  original 
Label  on  reel  of  new  copy 
BCD ^Binary 


Which  files  to  copy  on  tape 
Number  of  files  on  tape 


Density  on  original  tape 

Density  for  new  copy 

Program  to  use 


Print  tape 


Label  on  reel 
BCD 


Which  files  to  print 

Number  of  files  on  tape 
Density 


Program  to  use 

Punch  tape 

Label  on  reel 

BCD 

Which  files  to 

Niimber  of  file 

Binary 
punch 
s  on  tape 

Density 


Cards  to  use 


Turn  work  in  to  Room  llOa  ERL 


Program  to  use 


Date:    hh^jGh 
Pick  up  completed  work  in  Room  110a  ERL  Section:  I4.2.2. 
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k.2.2.6.      Use  of  the  Cathode  Ray  Tube  Display  (CRT) 

h. 2. 2. 6.1.      General 

The  IBM  7271  II  Cathode  Ray  Tube  (CRT)  Adapter  is  used  to  attach 
both  the  IBM  7^0  CRT  Recorder  and  the  IBM  78O  CRT  Display  eq.uipment  to  a 
modified  IBM  7607  Data  Channel. 

The  7^0  recorder  and  78O  display  units  serve  to  record  and  display 
graphical  output  from  the  computer  system.   The  7^+0  receives  digital  information 
from  the  computer  under  stored  program  control.   This  information  is  converted 
to  analog  information  in  the  form  of  voltages  that  are  used  to  position  and 
control  the  writing  of  dots  and  lines  on  the  face  of  a  seven-inch  CRT  tn  the 
recorder.   A  35nini  camera  records  the  patterns  written  on  the  tube  face. 

The  780  simultaneously  produces  a  visible  display^  on  a  21-inch  CRT, 
of  the  information  being  written  or  plotted  on  the  seven-inch  CRT  of  the  7^0* 
The  voltages  that  are  used  to  position  and  control  the  780  are  obtained  from 
the  digital-to-analog  converter  in  the  7^0-   The  780^  therefore,  can  operate 
only  when  connected  to  the  7^0- 

i+.2.2.6.2.   Operation 

The  CRT  units  are  selected  for  operation  by  execution  of  a  Write 

Select  instruction  with  an  address  portion  of  IO3O  (WRS IO30).   After  being 

selected,  the  next  Reset  and  Load  Channel  instruction  addressing  the  data  channel 
to  which  the  CRT  is  attached  initiates  data  transfer.   Operation  of  the  CRT  units 
is  then  under  control  of  the  data  channel's  word  counter.   The  units  will  remain 
connected  until  the  word  count  is  equal  to  zero  or  a  Reset  Data  Channel  instruction 
is  executed.   Timing  is  completely  automatic  and  the  average  data  transfer  rate  is 
approximately  667O  words  or  plot  points  per  second. 

Record  and  signal  input-output  commands  have  no  function  or  meaning 
when  applied  to  the  CRT  units. 

Film  frames  are  advanced  by  execution  of  a  Plus  Sense  instruction  whose 
address  portion  contains  IO3O.   This  instruction  may  be  given  at  any  time  in  the 
program.   If  the  CRT  is  selected,  the  film  will  be  advanced  immediately  following 
the  disconnect  of  the  CRT,  which  will  occur  when  the  word  count  goes  to  zero. 
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If  the  CRT  is  not  selected,  the  film  will  be  advanced  immediately. 

While  the  film  is  being  advanced,  execution  of  another  film 
advance  instruction  will  be  treated  as  a  No-Operation.   If  a  blank  frame  of  film 
is  desired,  the  following  program  may  be  used  to  synchronize  the  CRT  unit  and 
the  program: 

Instruction  Address  (Octal) 

PSE  -  1030 


WRS 

RCHA 

WRS 

RCHA 

PSE 


1030 

Y 
1030 

Y 
1030 


In  this  program,  Y  contains  an  Input-Output  under  Count  Control  and 
Disconnect  (IOCD)  command  whose  word  count  is  equal  to  zero. 

Stacking  of  data  transmission  operations  occurs  in  exactly  the  same 
manner  as  tape  transmission  operations.   In  general,  there  is  no  noticeable 
delay  between  a  CRT  disconnect  (word  count  zero)  and  the  ability  of  the  CRT  to 
accept  another  select  instruction.   This  is  also  true  if  the  film  is  to  be 
advanced  at  the  completion  of  data  transmission,  except  that  data  transmission 
will  be  delayed  until  the  film  has  completed  its  motion. 

Each  data  word  transferred  to  the  7^0  causes  either  one  dot  or  one 
axis  line  to  be  recorded  by  the  camera  and  displayed  on  the  780.   The  dot 
position  is  defined  by  x  and  y  coordinate  positions  specified  with  two  ten-bit 
numbers.   The  location  of  these  numbers  within  the  data  word  is  shown  below. 

Axis  Generation 


Dot 

Inten- 


sity 

X 

'         Wot  Used 

I 

X  Coordinate 

Wot  Used 

Y  Coordinate 

:>$$s^:^$^^^s^ 

^< 

2 


3 


7 


17  18 


25  26 


35 


The  first  three  bits  in  the  data  word  are  used  for  control  information, 
in  the  S  position  causes  an  intensified  dot  to  be  displayed  and/or  r^ 
depending  on  the  intensity  adjustments  of  the  individual  units.   T 
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A  bit 


ives  the 


ll 


programmer  an  easy  method  for  distinguishing  some  points  (every  fifth  point, 
for  example)  from  others.   A  bit  in  either  the  1  or  2  positions  will  initiate  an 
axis  sweep  starting  at  the  specified  x,  y  position  and  sweeping  to  the  right 
or  upward  direction  respectively.   A  bit  in  both  1  and  2  positions  causes  a 
diagonal  line  to  be  traced  from  the  selected  point  to  the  upper  right  edge  of 
the  raster. 

The  instruction  Store  Prefix  (STP  Y)  may  be  used  to  store  the  contents 
of  positions  P,  1  and  2  of  the  accumulator  into  positions  S,  1  and  2  of  a  word 
that  contains  the  coordinates  of  a  point  to  be  displayed  (intensity  and  axis 
positions). 

The  instruction  Store  Decrement  (STD  Y)  may  be  used  to  replace  the  x 
coordinate  in  register  Y  by  the  x  coordinate  in  the  accumulator.   The  Store 
Address  instruction  (STA  Y)  may  be  used  in  a  like  manner  to  replace  the  y 
coordinate  in  register  Y  by  the  y  coordinate  in  the  accumulator. 


U.2.2.6.3>   Coordinate  Display 

Ten  binary  digits  representing  the  horizontal  coordinate  (abscissa) 
of  a  point  are  stored  in  a  word  of  core  storage  along  with  ten  binary  digits 
representing  the  vertical  coordinate  (ordinate)  of  that  point.   The  plotting  area 
is  therefore  divided  into  2   (102^)  increments  in  both  the  x  and  y  direction. 
Each  pair  of  digital  coordinates  is  converted  to  proportional  voltages  which 
position  the  electron  beam  at  the  proper  point  on  the  cathode  ray  tubes.   The  x 
coordinate  occupies  bit  positions  8-17;  "the  y  coordinate,  bit  positions  26-35' 

The  instructions  shown  below  would  display  the  point  (512,  512)  on 
both  CRT's  at  the  center  of  the  area  covered  by  the  raster. 

Bit  Positions 


3  12   3^56 

Example : 
A 


7  3 17,  18  19 


20  21  22   23  2h      25   26 


WRS  536  „  (Channel  A) 
RCHA  B  i  1 


B 


+001000001000 
lOCD  B,  0,  1 


Y 


(octal  integer) 
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The  coordinates  of  the  point  may  be  seen  more  clearly  by  inspecting  the  binary 
equivalent  of  the  octal  integer  in  storage  location  B.   Bits  8-I7  (x  coordinate) 
and  26-35  (y  coordinate)  are  treated  as  unsigned  numbers.   The  (O,  O)  location 
is  thus  in  the  lower  left  corner  of  the  plotting  area. 

k.2.2.6.k.      Recording  Unit 

The  seven-inch  CRT  used  in  the  7^+0  employs  electrostatic  deflection 
and  focusing.  The  phosphor  is  a  Pll  type  giving  a  blue  phosphorescence  and  a 
persistency  of  only  a  few  microseconds.  The  raster  size  of  the  tube  is  3.366 
inches  x  3-366  inches.  A  three-inch  square  matrix,  centered  on  the  raster, 
will  drift  no  more  than  +  .OOU5  inches  in  six  minutes  or  +  .020  inches  within 
two  weeks  after  adjustment. 

Any  point  displayed  in  a  centrally  located  area,  the  sides  of  which  are 
3.k   (+  .000,  -.03^)  inches,  must  be  located  within  .015  inches  of  the  position 
occupied  in  a  truly  square  and  linear  matrix. 

The  half-light  mean  diameter  of  a  focused  normal  intensity  spot  in  a 
centrally  located  square  area,  the  sides  of  which  are  I.687  inches,  does  not 
exceed  .015  inches.   The  half-light  mean  diameter  of  any  other  spot,  outside  this 
area  but  within  the  3-^  square  inch  area,  does  not  exceed  .022  inches.   This 
spot  defocusing  applied  proportionately  to  an  axis  line. 

U.2.2.6.5.   Plotting 

In  order  to  plot  successive  distinct  points,  spot  size  must  be  taken 
into  consideration.   This  size  is  such  that  any  two  normal  intensity  spots  whose 
centers  are  displayed  four  increments  apart  will  appear  as  adjacent  resolved 
spots.   Thus,  even  though  the  raster  size  is  IO2U  x  102U,  only  256  resolved 
spots  may  be  used  on  a  vertical  or  horizontal  line.   A  very  smooth  line  may  be 
plotted  by  selecting  an  increment  of  1  instead  of  ^4. 

An  alphamerical  character  may  be  plotted  point  by  point  by  using 
a  suitable  program.   The  size  of  the  character  is  determined  by  the  CRT  plotting 
program. 
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k.2.2.6.6.      Display  Unit 

The  21-inch  CRT  used  in  the  7^0  employs  magnetic  deflection  and 
electrostatic  focusing.   The  tube  has  a  P7  phosphor  coating  that  gives  a 
blue-white  fluorescence  and  a  green-yellow  phosphorescence.   The  persistency  of 
the  tube  is  nominally  about  two  seconds^  but  will  vary  from  0  to  7  seconds, 
depending  on  the  amount  of  ambient  light.   The  unblank  time  of  the  CRT  is  10 
microseconds. 

Full  deflection  of  the  21-inch  CRT  will  be  no  more  than  ten  inches 
in  the  vertical  direction  and  15  inches  in  the  horizontal.   Accuracy  is  1%} 
that  iS;  the  maximum  error  in  any  spot  position  will  not  exceed  1%   of  full 
deflection,  and  a  spot  on  a  square  matrix  will  not  drift  more  than  1%   in  one  hour. 

The  780  can  be  adjusted  independently  of  the  7^0,  as  it  has  its  own 
controls  for  focus,  axis  intensity,  dot  intensity,  vertical  and  horizontal 
gain,  and  vertical  and  horizontal  centering. 

Because  the  7^+0  has  a  square  raster  and  the  78O  a  rectangular  one,  a 
figure  such  as  a  circle  displayed  on  the  7^0  will  appear  as  an  ellipse  with  an 
axis  ratio  of  3  to  2  on  the  78O. 

U.2.2.6.7.   Camera  and  its  Associated  Equipment 

A  35nim  pulse-operated  camera  is  provided  with  the  recording  unit 
to  photograph  the  display  on  the  seven  inch  CRT.   Associated  equipment  permits 
the  camera  to  function  in  conjunction  with  the  recorder  under  control  of  the 
computer.   Film  of  exposure  index  ASA  200  is  suitable  for  recording  the 
pattern  written  on  the  tube  face. 

The  camera  lens  system  is  capable  of  resolving  50  lines  per  millimeter. 
The  square  3'366  inch  raster  will  be  projected  as  a  .915  (+.025,  -.oUo)  inch 
square  on  the  film.   Distortion  or  error  in  presentation  will  be  no  more  than 
.05^  of  full  raster  size. 

The  camera  does  not  have  a  shutter  and  consequently  monitors  all 
information  written  on  the  CRT.   If  the  computer  is  placed  in  a  copy  loop  to 
regenerate  a  display  on  the  21-inch  tube  of  the  78O,  the  film  frame  in  the  7^0 
may  be  overexposed. 
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U.2.2.6.8.   Procedure  for  Use  of  the  CRT 

The  foregoing  sections  have  served  to  acquaint  the  user  with  the  CRT 

equipment  and  to  provide  him  with  the  basic  information  with  which  to  make 

his  own  decisions  concerning  his  needs  of  it. 

Use  of  the  CRT  is  fully  within  the  scope  of  the  PORTHOS  system, 

and  three  Library  Routines  are  available  to  facilitate  its  use.   They  are 
Library  Routine  J5-UOI-SCP1-23-SR  General  Axes  and  Point  Plotter 
Library  Routine  J5-U0I-SCP2-28-SR  FORTRAN  Axes  and  Point  Plotter 
Library  Routine  J5-UOI-SCP3-15-SR  General  Alphanumeric  Cathode  Ray  Display 

The  Subroutine  Library  is  discussed  in  section  5' 

The  following  procedure,  though  not  required  by  the  PORTHOS  system, 

has  been  found  to  facilitate  the  employment  of  the  CRT  subroutines,  and  the 

user  should  adhere  as  closely  as  practicable  to  it. 

a)  Indicate  the  number  of  frames  expected  on  the  line  provided 
on  the  Problem  Run  Card  submitted  with  the  CRT  problem. 

b)  Follow  the  Problem  Run  Card  with  a  $$  Comment  card:   THIS  IS  A 
CRT  PROBLEM  WITH  n  FRAMES  EXPECTED  where  n  is  an  integer. 

c )  Follow  the  $$  Comment  card  with  a  $  HALT  to  enable  the 
operator  to  turn  on  the  CRT  if  this  needs  to  be  done. 

If  steps  b  and  c  are  eliminated  and  the  CRT  is  not  on  at  the  time  of  a 
problem's  execution  and  a  call  for  the  CRT  occurs  within  the  problem,  a  hangup 
will  occur  and  the  next  Job  on  the  input  tape  will  be  called  in  by  the  operator. 
If  the  user  has  reason  to  include  other  $$  Comment  cards,  the  $  HALT  should  be 
placed  at  the  end  of  the  block  of  $$  Comment  cards. 

The  above  three  steps  are  a  means  of  assuring  that  the  CRT  problems 
are  run.  Following  are  steps  to  assure  that  the  quality  of  the  film  returned 
is  as  high  as  possible.    These  steps  are  to  be  carried  out  by  the  user 

through  programming. 

d)  Advance  the  film  5  frames  before  the  first  plot.   (see 
FLMADV,  page  h,    Library  Routine-J5-U0I-SCP2-28-SR). 
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e)  After  5  frame  advances,  plot  an  identification  frajne.   This  frame 
should  contain  the  following  information:   the  word  "Begin",  the  user's  name. 
Problem  Specification  number  and  number  of  frames  expected,  plus  any  additional 
information  the  user  desires  (see  Library  Routine  J5-UOI-SCP3-15-SR). 

f)  Advance  another  frame  before  beginning  graphic  plots. 

g)  At  end  of  plotting,  advance  the  film  5  frames  (see  d  above). 

h)  Repeat  the  identification  frame  described  in  e  above,  replacing  the 
word  "Begin"  with  "End".   •     '         •     '  ■ 

The  user  is  strongly  urged  to  plot  the  identification  and  any  graphic 
plots  five  times  before  advancing  for  the  next  plot.   This  will  assure  that  a 
sharp  and  easily  read  image  is  produced  on  the  film. 
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4. 2. 3-      Submitting  the  Job 

U.2.3-1.      General 

The  assumption  is  made  at  this  point  that  the  user  has  prepared  his  input 
deck  and  believes  it  to  be  correct  in  all  respects.   His  next  move  is  to  submit 
the  deck  of  cards  to  the  dispatcher  on  duty  at  Room  110a  ERL.   Immediately  before 
physically  handing  the  deck  to  the  dispatcher,  he  must  stamp  the  date  and  time 
on  the  front  of  his  Problem  Run  Card  (see  Figure  k^l)   by  placing  it  face  up;, 
top  to  the  left,  in  the  time  clock  located  in  the  hallway  outside  Room  110a  and 
next  to  the  Bulletin  Board  (see  section  k.2.k.l).      In  return  for  his  deck,  the 
dispatcher  will  give  the  user  a  receipt  in  the  form  of  an  orange  receipt  card 
(see  Figure  k.2)   similarly  stamped  with  the  date  and  time..   At  the  top  right  corner 
of  the  receipt  card  will  be  an  identification  code  usually  consisting  of  a  letter 
followed  by  three  digits.   This  code  will  be  henceforth  used  to  identify  that 
particular  run  of  that  particular  problemo   The  letter  signifies  the  "category" 
under  which  the  problem  will  be  run  and  the  three  digit  number  signifies  its 
position  within  the  category.   Numbers  run  sequentially  within  a  category;  e.g., 
U235  was  submitted  ahead  of  U7l'+.   Ordinarily,  within  a  category,  lower  numbered 
problems  are  completed  before  higher  nunibered  problems.   Elapsed  time  between 
submission  and  completion  of  a  problem  is  dependent  primarily  upon  its  category. 
Categories  enable  the  Digital  Computer  Laboratory  to  offer  more  efficient  service 
to  users;  they  are  discussed  below.   (See  also  section  U.2.4.2»),   A  suitimary  of 
the  categories  and  their  definitions  appear  as  Appendix  3- 

Uo2.3.2.   Shuttle 

For  short  programs.  Shuttle  services  offers  the  user  the  convenience  of 
a  relatively  short  turn-around  time.   To  be  included  in  this  Shuttle  category 
a  given  run  must  satisfy  all  of  the  following  conditions: 

1)  A  total  time  of  less  than  2  minutes 

2)  An  execution  time  of  less  than  1  minute 

3)  An  execution  printing  of  less  than  200  lines,  i.e.,  k   pages 
k)     An  execution  punching  of  less  than  50  cards 

5)  Less  than  500  assembly  language  cards 

6)  Less  than  50  FORTRAN  cards  or  less  than  500  MAD  cards  or_  less  than 
150  ALGOL  cards 
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7)  Less  than  500  binary  cards 

8)  Less  than  100  data  cards 

9)  Non-class  work 

10)  No  $  CLEANUP  cards  in  Job  deck  (see  section  6,2-9.3-) 

11)  In-system  and  no  special  requirements  (see  Problem  Specification  foM 
Appendix  h) 

Shuttle  problems  are  run  three  times  a  day,  at  9  AM,  2  PM,  and  9  PM, 
and  output  is  normally  available  about  three  hours  after  each  run  is  started. 
Job  numbers  for  Shuttle  runs  are  distinguished  by  the  letters  R,  S,  T  and  U. 
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Figure  U.2. 


i+.2.2.3-   Category  I. 

Jobs  under  this  category  are  usually  run  during  the  day  shift,  and 
turn-around  time  is  normally  low,  but  not  as  low  as  that  of  Shuttle  runs.   Only 
scheduled  engineering  on  the  709^  between  8:00  AM  and  10:00  AM  daily  and  the 
scheduled  Shuttle  runs  take  precedence  over  Category  I  problems.   Jobs  which,  for 
any  reason,  cannot  qualify  for  Shuttle  can  qualify  for  Category  I  if  they  meet 
the  following  conditions: 

1)  Execution  time  not  greater  than  3  minutes 

2)  Total  time  (translation  plus  execution)  less  than  5  minutes 

3)  Execution  printing  less  than  30  pages 

k)     Execution  punching  less  than  100  cards      .-   .■ 

5)  No  $  CLEAMJP  cards  in  input  deck  (see  section  6.2.9.3.) 

In  addition,  the  job  must  be  run  within  system  with  no  special  problem 
requirements,  such  as  cathode  ray  tube  plotting,  special  paper  or  cards,  etc. 
(see  section  2.2.3.).   If  ^   translation  is  involved,  then  the  execution  time  punched 
in  the  problem  run  card  must  be  3  minutes  or  less  and  the  number  of  pages  punched 
in  the  problem  run  card  must  be  30  or  less.   This  limitation  exists  for  all  categories. 

Job  numbers  for  Category  I  are  prefaced  by  A,  B,  C,  or  D. 

i+.2.3.1+.   Category  II  ■'   ' 

A  problem  qualifies  for  Category  II  if  it  does  not  qualify  for  a  higher 
category  and  it  meets  the  following  conditions:  ■   .  ^ 

1)  If  no  translation  is  involved  (i.e.  all  binary)  execution  time  is 
greater  than  3  minutes  but  not  greater  than  20  minutes.        '■ 

2)  If  a  translation  is  involved  (SCATRE,  FORTRAN,  etc.)  total  time  is 
greater  than  5  minutes  but  not  greater  than  20  minutes.   Further, 
execution  time  must  be  3  minutes  or  less  and  execution  printing 
must  be  30  pages  or  less. 
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Problems  in  Category  II  must  be  run  within  the  system  but  may  have  special 
requirements  as  described  in  section  U.U  which  do  not  require  more  than  20 
minutes  total  time.   Job  numbers  for  Category  II  are  prefaced  with  F^  G,  or  H. 

i|.2.3.5-   Category  III 

Problems  are  run  in  Category  III  if  they  require  not  more  than  1  hour 
of  computer  time  and  do  not  qualify  for  a  lower  category  assignment.   They  do  not 
have  to  be  run  irnder  the  system  and  may  have  special  requirements  (see  section  2.2.' 

Job  numbers  for  Category  III  are  prefaced  by  L,    M,    or  N. 

h.2.3.6.      Category  IV 

If  a  problem  cannot  qualify  for  any  other  category  assignment  for  any 
reason  whatever,  then  it  is  run  in  Category  IV.   Normally,  problems  in  this 
classification  have  the  lowest  priority  and  may  be  run  during  the  week-end. 
Job  numbers  for  Category  IV  are  prefaced  by  P  or  Q. 

^.2.3-7«   Mathematics  195  Homework 

'  Class-assigned  problems  for  all  sections  of  Mathematics  195  are  batched 
together  and  run  as  a  separate  category.   Job  numbers  for  this  category  are  four 
digits  long  and  are  not  prefaced  by  a  letter. 

U.2.3«8.   Single  Runs  of  Short  Programs 

As  computers  become  easier  to  use  and  as  more  people  become  familiar  with 
their  use,  small  single-shot  computer  runs  can  originate  from  many  sources. 
Examples  of  such  uses  are : 

1)  Course  homework  in  cases  in  which  the  instructor  has  not  explicitly 
designated  that  the  computer  be  used. 

2)  Exercises  carried  out  for  the  purposes  of  self  education,  practice, 
or  exploration  by  either  students  or  faculty. 

3)  Small  tasks  ancillary  to  but  not  central  to  a  piece  of  research,  such 
as  the  one-time  evaluation  of  a  complicated  expression,  the  preparatio 
of  a  small  specialized  table,  etc 
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The  Digital  Computer  Laboratory  encourages  such  uses;  however,  such  use 
must  be  assigned  a  priority  less  than  that  associated  with  research  ip  which^the 
computer  plays  a  central  role  or  instruction  in  courses  in  which  the  pomputer  is 
explicitly  used. 

To  accommodate  this  area  of  use  such  work  will  be  accepted  without  a 
specific  problem  specification  number  under  a  blanket  problem  specification  number 

28018 
Departmehtal  designation  in  this  case  is  XSSS,  which  must  be  punched  left-justified 
in  columns  55-60.   Such  work  will  be  collected  once  each  day  at  9  PM  and  normally 
returned  the  following  day. 

To  qualify  for  this  category  the  jobs  should  satisfy: 

a)  Execution  time  of  1  minute  or  less 

b)  Total  time  of  2  minutes  or  less 

c)  Execution  printing  of  3  pages  or  less 

d)  No  execution  card  output 

e)  No  binary  output  (PUNCH  0BJECT) 

f)  No  special  problem  requirements  (see  section  2.2.3.) 

The  problem  specification  number  28OI8  is  not  eligible  for  Shuttle  or 
Category  I.   Only  standard  research  or  instructional  problem  specification 
numbers  will  be  accepted  for  these. 

Research  problems  of  a  continuing  nature  or  requiring  more  than  one  run 
of  instructional  programs  in  which  the  computer  is  explicitly  used  are  expected  to 
follow  the  standard  problem  submission  procedures  as  described  in  the  preceding 
sections  of  this  manual. 

l  Only  one  run  per  day  per  person  will  be  accepted  for  28OI8.   No  work 

already  covered  by  an  existing  problem  specification  number  will  be  accepted 
under  the  28OI8  classification.  Any  work  already  covered  by  an  existing  problem 
specification  which  is  submitted  as  28OI8  will  automatically  be  regarded  as  a 
request  for  the  voiding  of  that  problem  specification  number. 

I  Job  numbers  for  this  category  are  prefaced  by  Y  and  Z. 
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k.2.k.     Processing  the  Joe 
14-.2.4.1.  The   5-all; 


"icn  CGnceming  ±hs   709^  installation,  is  posted  on  t: 
Bulletin  Board  outside  r.oon  IIC  EHL;  after  kS   hours  on  the  "-r-hc-.;:r  B^-ilILetin 
Board '%  the  notice  is  transferred  to  the  ad.jacent  general  ~-:' "  ---'-  Bcazd,  ■«here 
it  stays  for  an  indefinite  tine.   Eence,  xhe  regular  visitor  ~c  ~he  laccrator;-" 
need  only  check  the  i^-hour  BuZietin  Board  to  keep  acreast  of  the  notices  as 
they  are  posted. 

In  addition  to  "being  posted,  the  notices,  often  in  espanded 
fom^  are  included  in  the  Lahoratory  Bulletin,  which  appears  fron.  xine  zz   oine. 

Also  posted  on  the  Bulletin  Board  is  infomatlon  concez'ning 
the  sz&ze   of  the  cocrouters  (either  up  (operating)  or  iovn  '^not  operating  g^-r- 
"being  repaired) )  and  the  state  of  the  output,  in  the  fom  of  cards  vhich  indicate 
for  each  Category  (see  section  -.2.5.)  the  last  jo"b  nurier  conpleoed  and  ready 
for  return  to  the  user.   This  is  essentially  the  sane  infonnation  a-"-ailacle  cy 
telephone  through  the  recorded  nessage  (see  section  k,2.h.6.). 

t.2.^.2.  The   Routing  Office 

The  Eouting  Office,  Eoon  110  EEL,  is  xhe  focal  point  of  the 
user's  contacts  wdth  the  La"torator;-'.   It  is  here  that  he  deposits  his  jo"cs  for 
processing  and  receives  the  output  after  "nis  .jo"c  has  "ireen  conpleted.   The  Office 
is  open  2^^-  hours  a  day  and  T  days  a  veek,  except  for  certain  holidays. 

When  the  dispatcher  receives  the  jo"fc  fron  the  user,  nomally 
along  vith  a  request  for  a  particular  Categor;-"  placenent,  he  exar'nes  the  Jo"b 
to  see  if  it  qualifies  for  the  requested  Categor;-".   If  it  does  not,  he   notifies 
the  user  imnediately  and  offers  hin  the  choice  of   accepting  a  different  ■Oategor].^ 


^c  ^--vci 


or  retrieving  the  deck  for  alteration.  Otnervise, 
receipt  card  (see  section  4.2. 3. !•  snd  Figure  ^^.2. ),  places  a  divider  card 
(called  an  S-6  Card,  as  these  characters  are  "both  punched  in  Columi  l)  in  front 
of  the  deck,  and  places  it  in  a  netal  card  tray  with  other  jo"bs  in  its  Categor;.-. 
The  netal  travs  are  ncved  fron  the  Routing  Office  to  the  itOl  Cor^juter  Boon,  as 
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they  are  filled,  or,  as  in  the  case  of  Shuttle,  at  specific  times,  or  frequently- 
enough  to  keep  the  lUOl  computers  busy  loading  magnetic  tapes  or  processing  output. 

U.2.4,3'   Preparation  of  Input  Tapes 

¥hen  the  batched  jobs  are  delivered  to  the  lUoi  Computer  Room, 
the  computer  operator  loads  them,  in  the  order  in  which  they  arrived  at  the 
Routing  Room,  into  the  read  hopper  of  the  1^02  Read-Punch  unit.   He  places  a 
blue  system  input  tape  on  a  tape  unit  of  the  l401  and  turns  control  of  the 
computer  over  to  the  CHAOS  system, 

CHAOS  is  a  lUOl  program  which,  from  card  input,  prepares  a 
magnetic  tape  according  to  the  special  format  required  by  the  PORTHOS  system  for 
the  709^*   The  option  exists  to  alter  the  format  so  as  to  prepare  a  tape  meeting 
SHARE  Operating  System  specif icat ions.   CHAOS  also  will  print  and/or  punch  output 
from  a  tape  generated  by  the  709^  and  mounted  on  the  second  lUoi  tape  unit.   These 
operations  can  be  performed  separately  or  concurrently. 

At  the  same  time  that  CHAOS  is  preparing  the  magnetic  tape  for 
the  PORTHOS  system,  it  also  copies  the  user's  Problem  Run  Card  and  other  information 
(such  as  $$  comment  and  SAVEMOUUT  cards)  from  the  input  decks  and  punches  cards 
containing  this  information.   Together  with  a  standard  heading  containing  information 
common  to  all  the  jobs  on  that  particular  magnetic  tape,  these  cards  are  listed; 
the  listing  then  is  attached  to  the  tape  reel  for  delivery  to  the  709^  Computer 
Room.   This  listing,  or  "flow  sheet"  is  the  prime  source  of  information  for  the 
709^  computer  operator  concerning  the  processing  of  this  particular  system  input 
tape. 

After  the  input  decks  have  been  loaded  onto  magnetic  tape,  they 
are  returned  to  the  Routing  Room  to  await  the  output  from  their  processing  by  the 
709^. 

1^,2,4.^.   The  7094 

When  the  magnetic  tapes  have  been  loaded,  they  are  transported 
to  the  7094  Computer  Room,  where  they  await  their  turn  to  be  processed.   The  tapes 
are  loaded  onto  the  system  input  unit  by  the  operator  and  control  passed  to 
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PORTHOS,  which  processes  as  much  of  every  job  as  it  can,  automatically  rejecting 
those  which  cannot  be  continued  for  any  reason  with  appropriate  messages  to  the 
user,  and  prepares  a  tape  with  the  output  generated  by  each  job. 

When  the  entire  input  tape  has  been  processed,  its  function 
has  been  fulfilled;  however,  the  tape  is  reserved  for  a  few  days  in  case  the 
information  on  it  is  needed  for  some  other  purpose.  After  this  waiting  period, 
the  tape  goes  back  into  the  tape  pool  and  is  reused. 

4.2.4.5.  Processing  of  Output  Tapes 

The  output  tape  generated  by  the  709^  is  then  taken  back  to  the 
l401  Computer  Room,  where  it  is  processed  by  CHAOS,  the  user's  printed  and  punched 
output  being  the  result.   This  printed  and  punched  output  is  returned  to  the 
Routing  Room  where  it  is  broken  down  into  individual  jobs  which  are  collated 
with  the  appropriate  input  decks.   These  jobs  are  then  stored  by  job  number  in 
the  Routing  Room  and  returned  to  the  user  on  presentation  of  the  appropriate 
receipt  card  (see  Figure  4.2). 

4.2.4.6.  The  Recorded  Message 

The  user  need  not  pay  a  visit  to  the  7094-l401  Installation 
in  person  to  determine  the  state  of  the  output,  or,  specifically,  whether  or 
not  his  job  has  been  completed  and  can  be  picked  up  at  the  Routing  Room.   Four 
telephones,  numbers  333-1634,  333-1635 ^  333-1636,  and  333~l637^  located  in  the 
Routing  Room,  are  attached  to  message  recorders  on  which  Routing  Room  personnel 
periodically  record  the  state  of  the  7094-l401  system  and  the  work  flow  through 
it.   The  message  is  updated  approximately  every  hour.  Liberal  use  of  this 
service  by  users  is  encouraged, 

4.2.4.7.  Pickup  of  Output 

After  the  user  has  determined  definitely  from  the  Recorded 
Telephone  Message  (see  section  4.2.4.6.)  or  from  the  Bulletin  Board  (see  section 
4.2.4.1.)  that  his  job  has  been  processed  and  is  ready  to  be  picked  up,  he  should 
present  his  orange  receipt  card  (see  section  4.2,3,1.)  at  the  Output  window  of  the 
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Routing  Room,  Room  110  ERL.   He  will  be  given  all  the  input  material  (decks  or 
tape)  which  he  submitted  and  the  output  from  his  job,  which  in  addition  to  a 
listing  from  the  off-line  printer  may  include  punched  cards  or  35-™n  film  from 
the  CRT  recorder.   Output  may  be  picked  up  at  any  time. 
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14..2.5'   Interpreting  the  Output 
U.2.5-1-   General 

Normally,  every  user  of  the  709^+  system  eventually  receives  the  results 
of  his  run  in  the  form  of  printed  sheets  of  paper.   If  he  has  requested  it,  he 
also  receives  punched  cards  as  part  of  his  output. 

Both  printed  and  punched  output  are  in  standard  formats,  and  a  certain 
amount  of  effort  may  be  required  in  order  for  the  user  to  interpret  the  various 
parts  of  his  output.   This  section  is  included  for  the  purpose  of  explaining 
a  typical  output  so  that  the  user  will  be  better  able  to  interpret  his  own 
output  and  diagnose  his  troubles. 

Two  sections  follow:   one  is  concerned  with  printed  output  and  the 
other  with  punched  binary  card  output. 

U.2.5.2.   Printed  Output 

A  sample  printed  output  has  been  annotated  and  listed  in  the 
following  pages.   The  example  program  consists  of  a  small  MAIN  program  written 
in  FORTRAN,  and  two  subroutines,  one  in  SCATRE  and  one  in  FORTRAN.   Each  line 
on  the  output  is  numbered;  the  numbers  provide  references  for  the  explanations 
that  follow  the  output  listing. 
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Explanation  of  Listing: 

Line  1: 

CHAOS  is  the  name  of  the  lUol  Peripheral  processor  Input/Output  program. 
The  date  I2/IO/63  indicates  the  version  of  CHAOS  used  in  processing  the 
program  for  running  on  the  709^- 

Line  2 : 

This  line  appears  on  the  709^  On-Line  Printer  as  well  as  on  the  user's 
output.   When  a  job  is  submitted  to  the  709^  Routing  Office,  an  orange 
receipt  card  (see  section  U.2.3)  is  received.   In  the  upper  right  hand 
corner  of  the  receipt  card  is  a  four -character  code  consisting  of  either  an 
alphabetic  character  followed  by  three  numeric  characters  or  four  numeric 
characters.   This  Job  Number  appears  on  Line  2  in  two  places.   Line  2  then  con- 
sists of:  Date  run  on  709^  --  30  DEC  I963  12  30  63 ;  Job  Number  --  Si+63;  Day  — 
MONDAY;  Time  --  10  13:10  AM  (this  time  is  produced  by  the  716  printer  clock  and 
is  accurate  only  to  lOOths  of  minutes);  k   asterisks;  and  the  Job  Number  --  ShG^^ 

Line  3- 

This  line  is  the  card  image  of  the  user's  Problem  Run  (ID)  card  plus  two 
additional  pieces  of  information.   When  a  user  submits  a  problem,  one  ID 
card  is  required.   This  card  is  retained  with  the  deck  to  be  run  on  the 
709^.   In  the  Routing  Room  a  card  is  placed  in  front  of  the  user's  deck, 
which  signals  to  the  lUol  the  end  of  one  job  and  beginning  of  another; 
this  card,  called  the  S-8  card,  contains  the  Job  Number.   When  the  deck 
is  loaded  by  CHAOS  onto  an  input  tape,  CHAOS  adds  two  pieces  of  information, 
the  job  number  and  the  file  number  to  the  ID  card  image.   This  information 
appears  on  the  right-hand  side  of  Line  3»   Line  3  then  contains  this 
information:   Problem  Specification  Number  --  28012;  Name  of  User  --  FOSTER  MERLi 
J. ;  C  means  the  job  is  a  code  check;  Total  Time  Estimate  --  OO3;  Execute  Time 
Estimate  --  001;  Execute  Pages  Output  Estimate  --  0002;  Execute  Cards  Output 
Estimate  --  0003;  Kept  (left-justified)  --  DCL;  Job  Number  --  SU63;  and  File 
Number  on  the  input  tape  --  001.   This  last  item  indicates  that  the  job  was  the 
first  job  on  the  input  tape. 
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This  is  an  exeunple  of  $$  Comment  card.   It  is  the  means  of  providing 
the  operator  with  any  information  that  he  needs  to  properly  run  the  problem. 
Any  $$  cards  must  appear  immediately  after  the  ID  card  in  the  user's  deck. 
When  they  are  used  it  is  wise  to  utilize  some  method  of  assuring  that  the 
operator  reads  them.   This  can  be  done  by  one  of  two  methods:  the  first,  and 
least  desirable,  is  to  follow  the  $$  Comment  cards  immediately  with  a 
$  HALT  Control  card^  which  causes  the  computer  to  stop  so  that  the  operator 
must  look  at  the  on-line  printer  to  determine  why  the  computer  has  stopped; 
and  second,  is  to  provide  an  on-line  comment  to  be  printed  once  the  user's 
program  begins  execution,  followed  by  an  HTR  in  SCATRE,  a  PAUSE  in  FORTRAN 
or  a  PAUSE  WJZS.  in  MAD.   The  on-line  comment  would  inform  the  operator  to 
follow  the  instructions  on  the  $$  Comment  cards. 

This  line  contains  the  first  $  control  card  of  this  job.   The  $  control 
cards  may  appear  in  any  order  within  the  group.   Line  5  is  a  $  FORTRAN  card, 
signifying  that  the  first  set  of  cards  to  be  processed  are  to  be  FORTRAN 
compiled.   Any  $  Control  card  with  FORTRAN,  SCATRE,  MAD,  or  ALGOL  as  the 
control  word  causes  the  Monitor,  after  all  translations  have  been  completed, 
to  check  the  Execution  Time  Estimate  and  the  Execution  Pages  Output  Estimate. 
If  certain  limitations  on  these  (see  section  U.2.3)  are  exceeded  the  job  will 
be  deleted  with  an  appropriate  comment.   If  no  such  control  word  is  encountered 
these  estimates  are  limited  only  by  the  number  of  columns  available  for  them 
and  the  category  under  which  a  user  wishes  his  job  to  be  run. 

$  Gp   card  indicates  that  once  this  job  is  translated  execution  is  to  take 
place  if  no  errors  were  encountered  during  compilation  or  assembly. 
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Line  7 • 

A  $  DUMP  card  requests  a  dump  from  octal  location  07770  to  the  end  of  the 
user's  program.   It  includes  COMMON  or  ERASABLE  storage,  but  does  not 
include  any  subroutines  loaded  from  the  Library  Tape.   Generally,  a  $  DUMP 
will  be  sufficient  for  a  user's  code-checking  piirposes. 

Line  8: 

A  $  ijf)   DUMP  card  does  not  in  itself  provide  a  dump.   However,  if  Input -Output 
trouble  occurs  during  execution  of  the  program  (for  example,  trying  to  output 
a  number  too  large  for  its  field  specification),  a  $  l/0  DUMP  assures  that  a 
$  DUMP  or  $  LIBDUMP  or  $  FULL  DUMP  control  card  will  be  obeyed.   If  the  user 
submits  only  a  $  ijfi   DUMP  card,  a  dump  will  not  occur  (see  section  U.2.2.3'8.) 

Line  9: 

A  $  PRINT  0BJECT  card  indicates  that  a  listing  of  the  FORTRAN  compiled  program, 
(Lines  50-120)  is  desired.   This  card  is  redundant  if  the  group  of  $  Control 
cards  contains  a  $  SCATRE  card  since  the  listing  of  the  SCATRE  source  program 
is  essentially  the  same  as  an  object  program.   A  listing  of  the  compiled 
program  is  occasionally  helpful  in  determining  subtle  coding  errors. 

Line  10  thru  Line  22: 


These  lines  consist  of  the  first  source  program  to  be  compiled  by  FORTRAN 
(see  IBM  FORTRAN  manual  C28-605U-U).   Lines  I9  and  20  (statement  nimibers 
6  and  7)  are  subroutine  CALL  statements  to  the  SCATRE  and  FORTRAN  subroutines 
being  assembled  and  compiled  in  this  Job.   Line  21  contains  a  CALL  statement 
(statement  Number  8)  to  SYSERR  which,  if  executed  by  the  program,  will  assure 
the  user  of  receiving  the  dump  he  requested  with  the  $  DUMP  Control  card. 
Had  Line  21  been  omitted,  the  compiler  would  have  assembled  a  TSX  SYSTEM, U 
which,  if  executed,  would  not  have  caused  the  $  DUMP  to  be  operative.   This 
TSX  SYSTEM, U  is  generated  (Line  IO7)  but  if  a  CALL  SYSERR  is  included  and  exe- 
cuted, it  is  not  executed.   Line  22  is  an  END  card.   This  pseudo-operation 
card  must  terminate  each  FORTRAN  and  SCATRE  program  or  subroutine.   An 
ALGOL  program  is  terminated  by  a  "FINIS";  a  MAD  program  is  terminated  by  END 
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0F  PROGRAM  or  END  0F  FUWCTIjZiW.   No  instruction  or  set  of  instructions  is 
compiled  or  assembled  for  this  END  pseudo-op.   If  a  binary  deck  of  a  program 
or  subroutine  is  punched  there  is  no  indication  on  the  binary  cards  that  such 
a  card  appeared  in  the  source  program.   However;,  if  this  card  is  omitted, 
compilation  or  assembly  is  halted  and  an  appropriate  error  message  is  printed. 

Lines  23,  ^9,    21^,  and  239: 

These  lines  (page  title)  indicate  that  the  University  of  Illinois  revision 
(October  15,  19^3)  ot   a  FORTRAN  II  compiler  was  used  to  compile  this  program. 
Line  23  is  the  first  page  of  FORTRAN-' s  output  concerning  the  compiled  program. 
Line  U9  is  the  second  page.   Line  215  is  the  first  page  of  FORTRAN  concerning 
the  compiled  subroutine  PRINT.   Line  239  is  the  second  page. 

Lines  2^-26  and  2l6-2l8: 


The  information  contained  in  these  lines  is  of  value  to  the  user  when  the  size 
of  the  program  plus  storage  is  approaching  the  size  of  the  available  core 
storage.   This  information  in  each  case  refers  only  to  the  routine  being  compiled 
and  is  not  cumulative.   Line  26  indicates  that  the  program  segment  (lines  10-22) 
requires  87  decimal  (12?  octal)  locations  for  the  program  and  its  variables  whicl- 
were  not  declared  in  COMMON  Statements  and  also  requires  25  locations  of  COMMON 
storage,  from  location  32536^q  to  32561^^  (77^30q  -  77^6lg).   Line  2l8 
indicates  that  the  PRINT  subroutine  requires  82  decimal  (122  octal)  locations 
for  the  program  plus  its  dimensioned  variables  not  declared  in  COMMON,  and 
also  requires  25  locations  of  COMMON.   However,  these  25  locations  are 
the  COMMON  locations  for  the  same  array  as  in  the  MAIN  program;  thus  in 
determining  the  amount  of  storage  required  for  the  MAIN  program  and  the 
PRINT  subroutine,  they  would  be  considered  only  once.   The  user  should  see 
Line  326  for  more  information  about  the  amount  of  storage  left  for 
expansion  of  his  program. 

Line  27-29  and  219-221; 

COMMON  is  a  region  in  core  extending  from  location  77^+612  downward  (toward 
lower  addresses).   If  a  C0MM0N  statement  appears  in  the  FORTRAN  program, 
the  compiler  assigns  the  variables  appearing  in  that  statement  to  locations 


Date :  k/l^/6h 

Section:  U.2.5. 

Page :  17 
Change : 


I 


in  COMMON.   This  allows  a  user  to  simplify  communication  between  subroutines. 
Lines  29  and  221  contain:   l)  the  variable  name  in  COMMON  -  N;  2)  the  decimal 
value  of  the  location  where  assigned  -  325^1;   and  3)  the  octal  value  of  the 
location  where  assigned  -  77^6l.   When  assigning  more  than  one  variable  or 
variable  array  to  COMMON,  it  is  important  that  they  all  appear  as  COMMON 
variables  in  all  subroutines  where  they  are  to  be  used  and  that  they  are 
listed  in  the  same  sequential  order  on  each  C0MM0N  card. 

Another  means  of  communication  between  subroutines  is  the  use  of  an 
argument.   Note  that  Line  I9  contains  a  CALL  DUMPXR  (N;,B).   The  compiler 
constructs  two  words  (Lines  100  and  101 )  which  contain  the  compiler -as signed 
addresses  of  variable  arrays  N  and  B.   The  SCATRE  subroutine  makes  use  of 
these  orders  to  plant  addresses  within  itself  (Lines  I38  thru  1^1 ). 
Note  also  that  Line  20  contains  a  CALL  PRINT  (B).   Variable  array  B  has 
not  been  assigned  to  COMMON.   However,  the  compiler  constructs  a  word 
which  contains  the  compiler -as signed  address  of  variable  array  B  (Line  lOU). 
The  FORTRAN-compiled  subroutine  PRINT  then  compiles  the  necessary 
instructions  (Lines  2^9  thru  251 )  to  assure  the  correct  communication 
between  the  MAIN  program  and  subroutine  PRINT.   Because  the  communication 
of  arguments  is  from  the  CALL  statement  to  the  subroutine,  the  arguments 
in  the  subroutine  need  not  be  identical  in  name  to  the  ones  named  in  the 
CALL  statement. 

Lines  30-32: 

This  table  consists  of  the  variables  (subscripted  and  single)  that  are 
dimensioned  (Line  ll)  and  not  in  COMMON  (Lines  12  and  29)  or  are  contained 
in  EQUIVALENCE  statements.   Line  32  indicates  that  array  B  (dimensioned 
in  Line  ll)  begins  at  \anrelocated  location  86  decimal  (I26  octal).   Since 
there  were  25  locations  set  aside  for  B,  this  indicates  that  the  compiled 
program  occupies  the  (unrelocated)  locations  O-61  decimal  (0-75  octal).  See  L: 
120  to  confirm  this.   At  times  the  compiler  may  reserve  locations  between  the 
end  of  the  program  and  the  beginning  of  the  region  containing  user  variables 
for  its  own  assigned  symbols  necessary  in  the  operation  of  the  program.   When 
this  occurs,  a  gap  exists  between  the  end  of  the  compiled  program  and  the 

- assigned  variaM.e  locations. 
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Lines  33-3^  and  22^-227: 

The  compiler  assigns  symbols  to  all  F0RMAT  statements  used  within  a 
program.   As  all  F0RMAT  statements  must  be  labeled  with  Statement  Numbers 
in  the  source  program  (Lines  lU,  209^  and  21l),  this  table  provides  easy 
reference  to  the  location  within  the  program  at  which  a  particular 
F0RMAT  statement  begins.   For  example,  the  FORMAT  statement  (Line  ik) 
labeled  2  has,  according  to  Line  35,  been  assigned  the  symbol  8)2 
and  begins  at  location  OOO750  in  the  program.   Lines  120  and  II9 
(see  also  Lines  318-315)  show  that  the  first  6  characters  of  the  FORMAT 
with  EFW  (External  Formula  Number)  2  appear  at  location  00075p'   The 
remaining  characters  are  stored  at  successively  lower  locations  in  groups 
of  6  characters  each. 

Lines  36-38  and  228-230: 

This  table  consists  of  the  symbols  utilized  during  compilation  by  the 
compiler.   This  table  is  of  little  value  to  the  user  if  no  object  listing 
(Lines  50-120  and  2^0-319)  accompanies  the  printout.   The  information 
contained  herein  gives:   l)  the  symbol  used  by  the  compiler  -  2);  2)  the 
unrelocated  decimal  location  where  assigned  -  51;   and  3)  the  unrelocated 
octal  location  where  assigned  -  63. 

Lines  39-^2  and  I30,  231-233: 

A  means  must  exist  to  allow  subroutines  (user-written  and  Library)  to 
transfer  to  each  other.   When  a  subroutine  is  loaded  into  core  the  address 
of  its  entry  point  must  be  available  to  emy  other  routine  that  calls  that 
subroutine.   It  would  be  too  restrictive  on  the  user  to  require  that  he 
place  a  subroutine  in  the  same  locations  in  core  each  time  he  used  it. 
To  achieve  flexibility,  relocatable  subroutine  are  utilized.   A 
relocatable  subroutine  is  one  which  can  be  loaded  anywhere  in  core 
(above  07777o )  by  the  Loader,  and  once  this  loading  has  been  accomplished, 
all  necessary  symbolic  address  references  within  the  subroutine  will  be 
relocated  in  such  a  manner  as  to  make  that  subroutine  operable  and 
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accessible  wherever  it  may  be;  likewise  ERASABLE  provides  a  means  of  data 
communication  between  subroutines.   Transfer  Vectors  provide  a  means  of 
transfer  communication  between  subroutines.   These  Transfer  Vectors  appear 
at  the  beginning  of  each  program  or  subroutine  (Lines  50-55^  130,  2^0,  2Ul). 
As  noted  in  these  lines  they  consist  of  6  BCD  characters,  including  blanks, 
which  form  the  name  of  a  particular  subroutine.   These  BCD  subroutine  names 
also  appear  as  entry  point  names  on  the  Program  Cards  (first  binary  card) 
of  the  subroutines  CALLed.      When  the  Loader  loads   the 
program  subroutines  it  needs  certain  information  to  allow  it  to  effect  the 
necessary  linkages.   This  information  consists  of:   l)  the  BCD  name  of  the 
subroutine  (Lines  128  and  2^5  for  user  subroutines,  the  Program  Card  image 
for  Library  subroutines)  and  2)  the  location  in  core  where  that  subroutine 
entry  point  is  to  be  found.   The  Loader  replaces  the  BCD  Transfer  Vector 
name  with  a  TTR  (transfer  with  no  trapping)  to  the  location  in  core  where  the 
subroutine  is  to  be  entered.   Thus  before  the  Loader  has  linked  the 
subroutines.  Lines  50-55,  130,  2^0,  2Ul  would  appear  in  core  as 


Line  50 
Line  51 
Line  52 


(6) 
-2270626325^^ 

(7) 
-3^6362303^60 

(7) 

-3^+5163^53^60 


SYSTEM 

(tsh) 
(rtn) 


Line  53 
Line  5^ 
Line  55 


21+6^1+^+^+76751 

(M 
-075131^56360 

(6) 

-227062255151 


DUMEKR 

PRINT 

SYSERR 


Line  I30 
Line  2^+0 


33^75131^563 

(7) 

-3I+6263303I+60 

(7) 

-3^263ll433'+6o 


•PRINT 
(sth) 


Line  2U1  -3l+263ll433'+6o  (FIL) 

(The  digits  in  parentheses  are  the  representations  of  the  first  octal  digit  of 
the  niunb^i;;__wher)  it  is  considered  to  be  unsigned). 


Once  the  Loader  has  successfully  linked  the  subroutines,  the  Lines 
listed  above  would  have  the  BCD  name  replaced  by  TTR  to  the  entry  points 
of  the  subroutine  and  would  appear  as  words  marked  Al,  A2,  A3,  AU,  A5,  A6, 
G,  Jl,  and  J2  in  the  core  dump  (lines  3^6-383). 

Lines  Go,    78,  99,  103,  I06,  107,  1U2,  258,  2?^,  276  and  296  are  seen 
to  contain  transfer  references  to  the  names  in  Lines  50-55>  130,  2^0  and 
2U1.   Once  the  Loader  has  linked  the  subroutines  correctly,  the  execution 
of  TSX  DUMPXR,U  (Line  99)  causes  a  transfer  to  be  made  to  the  instruction 
indicated  at  Line  53<   At  Line  53?  execution  of  the  TTR  DUMPXE  causes  control 
to  transfer  to  the  instruction  indicated  at  Line  13^  (the  entry  point  of 
DUMPXR  subroutine  -  Line  128).   In  terms  of  the  core  dump,  word  El  causes 
a  transfer  to  word  A^  which  causes  a  TTR  to  word  H,  the  entry  point 
(Line  128)  for  the  DUMPXR  subroutine. 

Lines  39-^2  and  231-233  then  consist  of  two  transfer  vectors. 
The  information  provides  the  user  with:   l)  the  BCD  name  of  transfer 
Vector  entry  --  DUMPXR;   2)  the  unrelocated  decimal  location  of  the 
transfer  vector  entry  --  3j   and  3)  the  unrelocated  octal  location  of 
the  transfer  vector  entry  --  3- 

Lines  ^3-^^  and  23^-235= 

This  table  contains  the  BCD  names  of  the  subroutine  entry  points 

of  subroutines  that  are:   l)  a  part  of  some  other  segment  of  the  user's 

program  such  as  DUMPXR  and  PRINT;   2)  a  subroutine  found  by  the  Loader  to 

reside  in  Low  Core  (below  10000^),  such  as  SYSTEM  and  SYSERR;  or  3) 

o 

subroutines  called  from  the  Library  Tape,  such  as  (RTN)  and  (TSH)  on 
Line  hk   and  (STH)  and  (FIL)  in  Line  235- 

Lines  k'^-hQ   and  236-238: 

These  lines  contain  information  to  aid  the  user  in  determining  which 
instructions  appearing  in  the  object  program  listing  (Lines  50-120  and 
2UO-319)  correspond  to  the  statements  in  the  source  deck  (Lines  10-22 
and  203-21U).   The  user  is  informed  of:   l)  EFN  (External  Formula  Number, 
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the  statement  number  appearing  on  the  source  deck);  2)  IFN 
(Internal  Formula  Number,  the  symbolic  label  or  address  assigned 
by  the  compiler);   and  3)  the  location  where  the  IFN  appears  in  the  object 
program  listing.   For  example,  statement  number  6  (EFN)  (Line  I9)  refers 
to  the  statement  CALL  DUMPXR  (N,B)   The  IFN  for  this  EFN  is  1?  and  the 
octal  location  is  52.   Reference  to  Line  99  shows  that  at  location 
52  (unrelocated)  is  a  symbol  18A.   Above  location  52n  there  appears 
an  instruction  (17A  BSS)  that  has  been  assigned  to  no  location.   The 
FORTRAN  compiler  uses  this  method  to  assign  multiple  symbols  to  one 
location.   Any  reference  within  this  compiled  routine  to  17A  or  18A 
will  result  in  the  same  location  being  used  as  the  reference  point. 
Since  Line  20  also  has  an  EFN  of  7  and  has  been  assigned  an  IFN  of 
19  at  location  55p^  "the  locations  52o^  53ci  and  5^0  can  be  assumed 
to  be  the  compiled  instructions  necessary  to  perform  the  statement  CALL 
DUMPKR  (N,b).   Since  the  compiler  assigns  many  symbols  in  the  process 
of  compilation  and  since  the  user  will  not  necessarily  always  label  all 
statements,  there  is  not  a  one-to-one  correspondence  between  symbolic 
labels  (IFN)  found  in  an  object  listing  and  numbered  statements  (EFN) 
found  in  the  tables  illustrated  in  Lines  ^5-^8  and  236-238.   There  will 
be  a  one-to-one  correspondence  between  the  statement  numbers  of  all 
executable  statements  in  the  source  program  and  the  EFN's  given  in  this 
table.   In  general,  enough  information  is  given  in  this  table  to  allow  a 
user  to  locate  within  the  object  listing  a  particular  statement  appearing 
in  the  source  listing. 

Lines  50-120  and  2^0-319: 

These  lines  consist  of  the  object  listings  of  the  FORTRAN-compiled  MAIN 

program  and  PRINT  subroutine.   As  noted  above.  Lines  50-55  and  2^0-2^1 

are  BCD  representations  of  the  transfer  vectors.   The  remainder  of  the 

object  listing  consists  of  (for  example,  in  Line  57)-   l)  unrelocated 

location  of  the  instruction  --  00007„;  2)  octal  representation  of  machine 

o 

instruction  —  +060100000073;   3)  relocation  bits  --  010  (see  discussion 
below);  and  h)   the  compiled  instruction  in  symbolic  form  with  operation  code  in 
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mnemonics  --  STp   6)+5.   Reference  to  "IBM  709^  Principles  of  Operation" 
(IBM  Systems  Reference  Library -A22-6703-I)  and  to  SCATRE  (Library  Routine 
L1-U0I-SCRE-19-BX)  will  enable  a  proper  decoding  of  any  operation  code 
found  in  this  column. 


Relocation  Bits 


A  relocatable  program  is  one  so  constructed  that  it  may  be  relocated, 
as  a  unit,  into  any  position  in  core.   The  capacity  to  be  relocated 
to  any  position  in  core  requires  only  that  the  length  of  the  program 
(Program  Break)  is  not  greater  than  the  amount  of  space  left  in  core. 
In  order  to  relocate  a  program,  its  instructions  must  be  individually 
relocated.   In  order  for  the  instructions  to  be  relocated,  a  method  is 
needed  to  indicate  whether  the  address  and/or  decrement  portions  of  the 
instruction  must  be  adjusted  (relocated)  accordingly.   For  example,  an 
instruction  TXI  A,^,B  where  A  and  B  are  symbolic  addresses  within  the  program 
will  necessarily  have  the  value  of  A  and  B  change  with  every  change  in  the 
initial  loading  point  of  the  program.   The  relocation  bits  indicate  to  the 
Loader  that  such  is  the  case;  in  this  example,  both  the  address  A  and  the 
decrement  B  must  be  relocated  by  the  amount  the  program  is  being  relocated. 
Words  3  and  h   of  each  relocatable  instruction  card  (see  next  section) 
contain  a  series  of  0  and  1  bits  which  indicate,  in  certain  combinations, 
whether  the  decrement  or  the  address  of  an  instruction  (or  both)  are  to 
be  relocated.   The  combinations  and  their  meanings  are: 

00      do  not  relocate  the  decrement  or  address  of  this  instruction. 

This  combination  is  always  given  for  transfer  vector  entries. 
010     do  not  relocate  the  decrement;  if  the  number  in  the  address  is 

greater  than  the  Program  Break,  relocate  as  a  high  core 

location.   If  the  number  is  less  than  the  Program  Brealc, 

relocate  as  a  low  core  location. 
100     do  not  relocate  the  address;  relocate  the  decrement  as 

described  in  010. 
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oil     do  not  relocate  the  decrement;  if  the  number  in  the  address 
is  not  less  than  the  Program  Break,  relocate  as  a  low  core 
location;  if  less  than  the  Program  Break,  relocate  as  a 
high  core  location. 

110     do  not  relocate  the  address;  relocate  the  decrement  as 
described  under  Oil. 

(a  "low  core  location"  is  relocated  upward  ,  a  "high 
-^         core  location"  is  relocated  downward;  see  below). 

In  general,  the  Loader  begins  with  bit  1  of  word  3  on  the  relocatable 
instruction  card.   If  bit  1  is  0,  it  checks  bit  2.   If  bit  2  is  0  the  first 
instruction  (word  5 )  on  the  card  is  loaded  as  it  appears  on  the  card.   If 
bit  2  is  1,  the  Loader  then  checks  bit  3  to  determine  whether  it  is  a 
0  or  1.   In  either  case,  the  address  of  the  first  instruction  is  to  be 
relocated,  the  direction  being  determined  by  the  0  or  1  found  in  bit  3» 

If  bit  1  is  a  1,  the  Loader  then  checks  bit  2  for  a  0  or  1.   In 
either  case,  the  decrement  will  be  relocated,  the  direction  being  determined 
by  the  0  or  1  in  bit  2.   In  this  case,  bit  3  must  be  checked  to 
determine  if  the  address  is  to  be  relocated  or  not.   If  bit  3  is  a  0, 
the  address  is  not  relocated;  the  first  instruction  (v/ord  5)  is  then 
loaded  and  the  decrement  only  is  relocated.   If  bit  3  is  a  1,  then  bit 
h   must  be  checked  for  a  0  or  1  to  determine  the  direction  of  relocation 
for  the  address  of  the  first  instruction-   In  either  case,  both  the 
decrement  and  address  of  the  first  instruction  will  be  relocated  when  it 
is  loaded  into  core. 

A  general  rule  can  be  stated:   If  neither  decrement  nor  address 
is  to  be  relocated,  two  relocation  bits  (both  O)  are  needed;  if  either 
decrement  or  address  is  to  be  relocated,  three  bits  are  needed  (1st  or  3rd 
must  be  O);  and  if  both  decrement  and  address  are  to  be  relocated,  four 
bits  are  needed. 
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The  relocation  bits  contained  in  the  object  listing  can  be  interpreted 
as  follows:  Line  57  is  OOOO7  +O60IOOOOOO73  010  ST0  6)+5.   The  relocation 
bits  010  indicate  that  the  Loader  will  not  relocate  the  decrement.   It 
will  check  the  address  (00073^)  against  the  Program  Break  for  this 
subroutine  or  program  (00122oJ'   The  address  (O0073o)  is  less  than  the 
Program  Break  so  the  current  relocation  amount  (lOOOOn  in  this  case) 
will  be  added  to  this  address,  i.e.,  it  will  be  relocated  as  a  low 
core  address.   When  relocated  in  core,  this  instruction  will  appear  at 
location  10007g  as  +O601OOOIOO73  (see  A7  in  the  core  dump). 

Line  88  is  OOOUl  +O6OIOOIOOI27  Oil  STjZi  B+1,1.   The  relocation 
bits  Oil  indicate  that  the  Loader  will  not  relocate  the  decrement. 
Again,  the  address  (00127o)  will  be  checked  against  the  Program  Break 
for  this  program  (00127p)'   The  address  is  equal  to  the  Program  Break  and 
will  be  relocated  as  a  low  core  address.   Therefore,  at  location  lOO^+lo 
in  core  (see  D)  this  instruction  will  appear  as  +  060100110127-   The 
variable  B  referred  to  in  this  instruction  is  a  dimensioned  array  not  in  COMMOW 
which  thus  lies  between  the  last  compiled  instruction  (Line  120)  of  this 
program  and  the  Program  Break  for  this  program  (Line  26).     Since  the 
compiled  instruction  at  Line  88  has  an  address  of  B+1,  this  unrelocated 
octal  address  coincides  with  the  Program  Break.   If  the  instruction  had  been 
ST0  B,l  the  relocation  bits  would  have  been  010  to  allow  for  correct  low 
core  relocation. 

Lines  60,  78,  99,  103,  IO6,  IO7,  258,  27^,  276,  and  296  (respectively 
words  B,  C,  El,  E3,  EU,  E5,  L2,  Ml,  M2  and  W  in  core)  have  previously 
been  noted  as  containing  the  TSX  transfers  to  the  transfer  vector  in 
Lines  50-55  and  2^0-2^+1. 

Lines  65,  6^,    62,  77>  81,  89,  98,  102,  IO5,  273.  295,  and  297  are 
compiler -provided  means  of  internal  reference  within  a  subroutine.   For 
example,  a  reference  within  the  first  program  to  symbolic  location  7A 
and  8A  (Lines  65,  GG)   would  be  equivalent  to  a  reference  to  symbolic 
location  9A  (Line  67). 


Lines  110-118^  305-313;  and  319  3.re   compiler -produced  constants 
used  by  the  respective  programs.   They  can  be  floating  point  constants 
(Lines  113  and  308)^  integer  constants  to  be  used  in  indexing, 
decrementing  and  incrementing  (Lines  110-  112,  115-118,  305-307;  and 
310-313);  integer  constants  to  be  used  as  references  to  Input,  Print 
Output  and  Punch  Output  logical  tape  units  (Lines  110,  305;  306), 
constants  for  incrementing  addresses  within  a  subroutine  (Line  319);  or 
constants  to  be  used  for  storage  (Line  313)-   Lines  120-119  and  3l8-31^ 
contain  the  BCD  representation  of  the  FORMAT  statements  (Lines  1^+, 
209  and  211)  of  the  source  program.   Note  that  these  are  stored  backwards 
(high  address  to  low)  in  core,  as  are  all  dimensioned  arrays. 

Saving  Index  Registers  and  Returning  Control  to  Calling  Routine: 

Lines  2U2-2^i+  contain  zeroed  locations  provided  by  a  FORTRM-compiled 
subroutine  for  the  storage  of  the  contents  of  index  registers  1,  2  and 
h.      Lines  301-303  restore  the  contents  of  the  index  registers  1,  2  and  k 
before  leaving  the  FORTRAU-compiled  subroutine. 

Line  30U  provides  an  exit  to  the  calling  routine,  to  the 
location  from  which  this  subroutine  was  called,  plus  one,  plus  the  number 
of  arguments  listed  in  the  CALL  statement.   For  example,  line  20  of  the 
source  program  calls  PRINT  (b);  it  has  one  argument,  B,  so  the  compiler 
assembles  two  words  for  this  calling  sequence  (Lines  103-10^1 ).   Line  304 
of  the  compiled  PRINT  subroutine  transfers  control  back  into  the  calling 
routine  at  Line  IO5  (same  as  Line  IO6). 

In  the  SCATRE  subroutine  (Lines  I33-I85);  the  user  must  provide  the 
necessary  code  to  save  the  index  registers.   Thus,  upon  entry  into  the 
DUMPXE  subroutine  (Line  13^);  the  contents  of  index  register  h   are  stored 
by  the  user  in  unrelocated  location  15g  (Line  1^6).   This  is  done  because 
the  user  knows  the  subroutine  is  to  use  index  register  k    (Line  1^2 )  and 
its  contents  will  be  destroyed  if  not  saved.   Index  registers  1  and  2  are 
not  to  be  used  by  the  DUMPXR  subroutine  so  they  are  not  saved,  as  they 
will  be  intact  upon  re-entry  into  the  calling  routine.   The  CALL 
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statement  (Line  I9)  for  this  DUMPKR  subroutine  has  two  arguments,  N  and  B, 
and  the  compiler  has  constructed  tliree  words  for  this  calling  sequence 
(Lines  99-101)'   Therefore,  the  user  returns  control  to  the  calling  routine 
by  transferring  to  the  original  exit  location  within  the  program  plus 
three  (Line  1^7 )•   Control  is  then  returned  to  Line  102  (same  as  IO3). 


Line  121: 


This  $  SCATRE  Control  card  indicates  that  what  follows  is  to  be  assembled 
by  the  SCATRE  assembly  program.   No  $  PRINT  0BJECT  is  necessary  as  a 
listing  is  automatically  provided  by  the  assembler.   The  END  Pseudo-operation 
card  (Line  I85)  signals  to  the  assembler  that  the  end  of  the  routine  has 
been  reached. 


Line  122: 


This  line  gives  the  following  information:   Page  number  of  listing  --  1; 
Name  of  assembler  --  SCATRE  (SCAT-Compatible  Assembler,  Translator, 
RElocatable)/  Indication  that  the  assembled  program  is  relocatable  -- 
Relocatable  Assembler;  And  the  date  of  the  assembly  --  I2/30/63. 


Line  123: 


This  information  indicates  the  date  of  the  latest  version  of  the  SCATRE 
assembler  -  11/0^1/63. 


Line  12^: 

An  indication  that  the  Program  Card  for  this  subroutine  was  prepared  by 
the  assembler.   The  Program  Card  provides  information  to  the  Loader  which 
is  used  in  reloading  and  relocating  the  subroutine  or  program  (see 
description  of  Pi^ogram  Card  below). 

Line  12^: 

Information  of  two  kinds  is  provided  here:   l)  the  length  of  the  program 
in  octal  -  63,  and  2)  the  number  of  subroutines  this  subroutine  calls 
through  its  transfer  vector  -  1. 


Date : 

I1/15/6U 

"^ 

Section: 

If. 2. 5. 

Page: 

27 

Change : 

Line  126: 

ERASABLE  storage  begins  at  location  77777o'   If  a  user  wished  to  use 
ERASABLE  for  data  storage  and  declared  such  by  using  the  ERAS 
pseudo -operation  (see  SCATRE  User's  Manual),  the  lowest  location  of  ERASABLE 
storage  used  would  appear  on  this  line.   This  line  also  contains  the  unrelocatec 
address  in  octal  of  the  location  of  the  first  transfer  vector  entry. 

Lines  127-128: 

These  lines  contain  the  unrelocated  location  in  octal  of  the  entry  points 
to  this  subroutine.   In  this  case  it  is  the  first  location  -  00001  (Line  13^+) 
after  the  transfer  vector  (Line  130 )•   In  general,  it  would  be  possible 
to  have  the  entry  point  for  this  subroutine  at  any  point  within  the 
subroutine,  provided  the  user  so  coded  the  subroutine. 

Lines  129-130= 

This  is  the  BCD  name  in  the  transfer  vector.   Line  I30  contains,  in  order: 
1)  the  unrelocated  location  of  the  transfer  vector  in  octal  -  00000;  2)  the 
octal  equivalent  of  the  BCD  name  of  the  transfer  vector  -  33^75131^563;  and 
3)  the  BCD  name  of  the  subroutine  which  this  transfer  vector  entry  refers 
to  -  .PRINT. 

Line  I3I: 

This  line  indicates  that  what  follows  is  the  listing  of  the  SCATRE  cards 
that  have  been  assembled. 

Lines  132-l8^: 

Included  here  are  ,  (Lit^e  .I3U ) :  l)  the  unrelocated  location  of  the  instruction  - 
OOOOlo;  2)  the  octal  representation  of  the  machine' instruction  -  063^  00  k   001^ 
and  3)  the  BCD  card  image  of  the  assembly  instruction  as  coded  by  the 
user  -  DUMPXR  SXA  A,^.   Detailed  descriptions  of  the  assembly  instructions 
can  be  found  in  IBM  Reference  Manual  A22-6703  ("IBM  709U  Data  Processing 
System"),  and  SCATRE,  Library  Routine  Ll-U)ZSl-SCRE-19-BX.   Line  133  contains 
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the  pseudo-operation  ENTRY,  necessary  to  establish  the  linkage  between  this 
subroutine  and  the  calling  subroutine  (Line  I9  and  Lines  99-IOI).   Line 
13^  (the  entry  point  of  DUMPXR  subroutine)  saves  the  contents  of  index 
register  k   so  that  it  may  be  restored  before  exiting  from  this  subroutine 
(Line  1^7)-    Index  registers  1  and  2  are  not  saved  as  the  two  index 
registers  are  not  used  within  this  routine,  and  will  therefore  contain  the 
same  values  upon  exiting  as  they  did  upon  entering.   Lines  I38  and  lUO  contain 
the  necessary  instructions  (CLA  l^U  and  CLA  2,k)   to  bring  into  the  subroutine 
the  arguments  of  the  subroutine  called  (Lines  I9  and  100,  lOl).   Line 
1U7  contains  the  transfer  retiurn  to  the  calling  subroutine  (Line  IO5-IO6). 
Line  I85  contains  the  pseudo-operation  EETD  card.   No  instruction  is  assembled 
for  this  card;  it  is  a  signal  to  the  assembler  that  the  end  of  the  group 
of  cards  to  be  assembled  has  been  reached. 


Line  I86; 

This  message  states  the  first  unrelocated  octal  location  within  core 
not  used  by  this  program  or  subroutine.   .   ,   ' 

Line  187-197= 

This  is  a  table  of  symbols  used  in  the  assembled  program  or  subroutine. 
The  information  given  is:   l)  the  type  of  reference  made  (R  =  relocatable 
within  the  program,  T  =  transfer  vector  entry);  2)  the  symbol  referred  to 
--  A;  3)  the  location  or  value  assigned  to  the  symbol  in  octal  --  15; 
and  h)   the  unrelocated  octal  locations  where  symbol  is  used  --  1,15- 

Line  I98 : 

Fatal  errors  are  those  in  a  SCATRE  program  which  cause  execution  of  the 
program  to  be  considered  futile.   An  undefined  symbol  (referred  to  in  the 
program  but  not  defined  in  columns  1-6)  is  such  a  case.   The  same 
symbol  appearing  in  two  or  more  distinct  places  in  columns  1-6  is 
another  such  case.   Line  I98  serves  to  indicate  such  occurrences.   If 
Line  I98  contains  the  statement  "FATAL  ERRORS  n",  loading  and  subsequent 
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execution  of  the  program  is  not  attempted.   Instead,  within  the  listing 
(Lines  133-l8^)  will  appear,  in  the  left-hand  margin,  a  series  of  alphabetic 
flags.   The  SCATRE  manual  indicates  the  definition  of  the  types  of  errors 
flagged. 

In  addition  to  Line  I98,  a  line  can  follow  it  of  this  form: 
"NON-FATAL  ERRORS  n" .   Non-fatal  errors  occur  when  an  omission  is  made, 
for  example,  of  a  variable  field,  a  tag  or  a  decrement.   These  omissions 
are  flagged  as  are  fatal  errors,  but  loading  and  execution  are  not  suspended 
if  there  are  no  fatal  errors. 

Line  I99: 

This  message  states  the  decimal  number  of  cards  that  were  input 

for  the  assembly.   This  number,  23,  excludes  the  $  control  cards  required 

for  this  assembly,  but  includes  the  END  card.   It  should  be  noted  that 

there  can  be  more  words  in  core  utilized  by  the  assembled  program  than  the 

number  of  cards  read  into  the  assembler.   Line  I'Jl ,    for  example,  is 

one  card  image,  but  the  nature  of  the  BCI  pseudo-operation  used  on  this 

card  necessitates  the  use  of  six  words  of  core  in  its  assembly. 


Line  200: 


The  $  F0RTRAN  Control  card  signifies  to  the  Monitor  that  what  follows  is 
to  be  compiled  by  the  FORTRAN  compiler. 


Line  201; 


As  this  compilation  is  considered  a  separate  portion  of  the  program, 
the  $  HIINT  Reject  control  card  is  necessary  to  get  an  object  listing 
(Lines  2^+0-319)  of  this  subroutine. 


Line  202: 


The  $  PUNCH  0BJECT  Control  card  indicates  that  the  object  program  should 

be  punched  in  column  binary  form.   This  will  cause  only  the  subroutine 

PRINT  to  be  punched.   It  is  important  to  note  that  this  subroutine,  in  binary 
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form,  can  be  used  with  other  programs  without  recompilation.   This 
flexibility  is  made  possible  by  relocatable  instructions  and  the 
utilization  of  transfer  vectors  as  described  under  Lines  39-U2 
above. 

Lines  203-21^: 

See  lines  10-22  above. 

Line  21^: 

See  Line  23  above. 

Lines  2l6-2l8: 

See  lines  2^1-26  above.  -. ,,   ' 

Lines  219-221: 

See  Lines  27-29  above. 

Lines  222-22^+: 


This  table,  "LOCATIONS  FOR  VARIABLES  NOT  APPEARING  IN  COMMON,  DIMENSION, 
OR  EQUIVALENCE  STATEMENTS"  consist  of:   l)  the  single  variable  --  I; 
2)  its  unrelocated  decimal  location  --  8l;  and  3)  its  unrelocated  octal 
location  --  121.   Upon  examination  of  Lines  13,  15,  l6,  and  17,  it  will  be 
seen  that  the  single  variables  I  and  J  appear  and  seem  to  fall 
in  this  category.   Scrutiny  of  Lines  207,  208  and  210  would  not 
dispel  this  belief.   One  subtle  difference  exists,  however,  that  causes 
the  compiler  to  compile  a  program  which,  in  the  subroutine  PRINT,  requires 
the  variable  I  to  be  set  aside  as  a  storage  location.   This  difference 
is  found  in  the  different  manner  (Line  13  and  Lines  208  and  210)  in  which 
the  I  and  J  variables  are  used.   Lines  62-6k   show  how  the  former  is  compiled. 
Lines  25'+-256,  26O-268  indicate  the  method  used  in  compiling  the  latter. 
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Lines  22^-22Y: 

See  Lines  33-35  above. 

Lines  228-230: 

See  Lines  36-38  above. 

Lines  231-233= 

See  Lines  39-^2  above. 

Lines  23^-235: 

See  Lines  h^-^^   above. 

Lines  236-238: 

See  Lines  U5-^8  above. 

Line  239: 

See  Line  23  above. 

Lines  2^0-319: 

See  Lines  50-120  above  for  description  of  object  program  listing. 

Lines  2^2-2^^  (J3^  J^ >    J5  on  line  36^)  are  storage  locations  set  aside  by 

the  compiler  within  each  FORTRAN  subroutine  to  retain  the  values  contained 

in  index  registers  1,    2  and  k   upon  entry  into  the  subroutine.   Line 

2U5  (J6  on  Line  36^)  contains  the  BCD  symbol  of  the  subroutine  name  as 

given  in  Line  20U  --  ^75131^56360  --  BRINT  . 

Line  320: 

If  data  is  to  be  read  during  execution,  the  data  must  be  preceded  by 
a  $  DATA  control  card.   This  is  a  signal  to  the  Monitor  and  Loader 
that  what  follows  is  data,  and  that  loading  and  execution,  if  a  $  G0  card 
was  included  in  first  group  of  $  control  cards,  are  to  occur.   This  line 
is  an  indication  that  such  a  card  has  been  encountered. 
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Lines  321-32^: 

The  Map  is  constructed  by  the  Loader.   It  is  included  as  a  portion  of 
execution  page  output.   The  Map  indicates  to  the  user  where  in  core  lie 
the  different  portions  of  the  executed  program.   As  this  Map  is 
an  important  part  of  any  debugging  that  is  attempted,  a  detailed 
description  of  its  meaning  follows.   References  will  be  made  to  the  transfer 
vectors  involved,  the  source  statements  involved,  and  the  corresponding 
words  in  core.   All  numeric  values  given  are  octal.   An  asterisk  beside  a 
value  indicates  that  the  subroutine  in  question  was  a  Library  subroutine. 
A  numeric  value  of  00000  indicates  that  the  subroutine  is  a  Low  Core 
subroutine  and  for  the  purposes  of  the  program  being  compiled  or 
assembled  requires  no  storage  locations  that  effectively  reduce  the 
amount  of  core  available  for  expansion  of  the  progranio 

Line  322  has  an  entry  (MAIN)  10000.   This  indicates  that  the  binary 
program  considered  to  be  the  MAIN  program  (Lines  10-22)  is  loaded  beginning 
at  octal  location  10000  (Al).   Another  entry  in  Line  322  indicates  that  the 
user-written  subroutine  DUMEXE  (Lines  I32-I85)  has  been  loaded  in  core 
at  octal  location  10127  (G).   The  length  of  (MAIN)  (Line  26)  indicates 
that  storage  locations  10127g  up  to  77^30g  were  not  used.   Therefore 
DUMHCR  is  placed  by  the  Loader  at  location  101273-   The  length  of  DUMEXE 
(Line  I8U) indicates  that  DUMEKR  will  lie  in  locations  10127g  to  10211g.   An 
entry  in  Line  322  indicates  that  the  user-written  subroutine  PRINT  (Lines 
203-21^1)  is  loaded  beginning  at  octal  location  10212  (Jl).   Line  2l8  indicates 
that  PRINT  requires  121  octal  locations  of  storage.   Therefore,  PRINT  will 
utilize  storage  up  to  10333o  (Q)-   At  this  point,  all  user-written  subroutines 
have  been  loaded  and  the  next  step  is  for  the  Loader  to  load  and/or  link 
any  Library  subroutines  w  lich  came  from  tape  or  are  in  Low  Core.   Wliich 
subroutines  are  required  to  complete  this  linking  action  are  determined  by 
the  Loader  as  it  inspects  the  transfer  vectors  (Lines  50-55^  130,  2^+0 
and  2^1).   In  order  to  be  operative,  these  subroutines  may  in  turn  require 
other  subroutines.   This  operation  of  loading  and  linking  continues  until 
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all  subroutines  needed  are  loaded  and  all  transfer  vector  entries  in 

BCD  (Lines  50-55?  130,  2U0  and  2^+1)  have  been  converted  to  transfer  (TTR) 

orders  with  properly  relocated  addresses  (A1-A6,  G,  Jl,  J2,  etc). 

For  example,  (Line  50 )  transfer  vector  entry  Number  1,  nov? 
relocated  at  location  lOOOOo  (Al),  has  the  machine  code  002100003556 
(TTR  03556).   This  subroutine  (SYSTEM)  lies  in  Low  Core  and  its  entry  point 
is  reached  by  transferring  to  location  O3556o-   This  fact  is  borne  out  by 
the  Map  entry  (Line  322  --  SYSTEM  00000*),   In  like  manner,  BCD  transfer 
vector  entries  at  Lines  51  --  (TSH),  52  --  (RTN),  53  --  DUMPXR,  5^  --  PRINT, 
55  --  SYSERR,  130  --  .PRINT,  2^0  --  (STH)  and  2^41  --  (FIL)  of  the  user  routines 
have  been  changed  to  00210001^255  (A2),  002100012662  (A3),  002100010130  (AU), 
002100010220  (A5),  002100003555  (A6),  00210001336?  (G),  00210001^+030  (Jl), 
and  002100012635  (J2)  respectively.   Al  (address  3556g)  and  A6  (transfer 
vector  entry  SYSERR)  are  indicated  on  the  Map  as  being  Low  Core  routines 
(Line  322).   A2  (address  IU2553)?  A3  (address  12662g),  AU  (address  10130g), 
A5  (address  10220q),  G  (address  1336?  ),  Jl  (address  1U030q),  and  J2 
(address  12635g)  all  refer  to  relocated  addresses  (addresses  above  lOOOOn). 
(TSH),  for  example,  is  given  on  the  Map  a  relocated  address  of  1^2^bg-  A2 
is  the  transfer  for  the  transfer  vector  entry  (TSH)  (Line  51)-   The  six-word 
difference  between  the  first  relocated  location  (1^+2^+60)  of  (TSH)  on  the  Map 
and  the  entry  point  of   (TSH)  (14255q)  given  in  the  transfer  vector  is  due 
to  the  transfer  vector  of  (TSH)  and  the  locations  used  to  save  index  registers 
on  entry  into   (TSH).   A  similar  difference  can  be  due,  also,  to  the  fact 
that  a  subroutine  may  have  entry  points  at  different  points  within  itself. 
A3  transfers  to  relocated  location  12662g-   Reference  to  the  Map  (Line  32^) 
and  the  original  BCD  transfer  vector  (Line  52)  shows  that  this  entry  point 
is  in  subroutine  (RTN)  whose  initial  relocated  loading  location  is  1056ln 
(Line  32^+).   Similarly,  A^,  A5,  G,  Jl,  and  J2  transfer  to  relocated  routines 
DUMECR,  PRINT,  .PRINT,  (STH),  and  (RTN)  respectively. 
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Location  of  an  Instruction  in  a  Relocated  Program: 

Line  100  is  an  instruction,  TXH  N,  that  indicates  to  the  subroutine 

DUMFXR  the  location  of  Array  N.   Suppose  a  user  wishes  to  determine  if 

this  reference  N  is  in  core  as  it  should  be-   The  unrelocated  address 

in  Line  100  indicates  that  this  instruction  is  in  the  53rd  octal  location. 

The  Map  indicates  that  this  routine  (MAIN)  has  been  relocated  at  location 

lOOOOg-   Adding  53  to  10000  we  get  10053;  the  relocated  octal  location  in 

core  where  this  instruction  lies.   In  the  core  dump,  the  instruction  at 

octal  location  10053,  E2,  is  300000077^+610-   This  instruction  is  TXH 

with  an  octal  address  of  77^6l.   Reference  to  Line  29  of  the  user's 

listing  shows  that  the  compiler  has  assigned  the  first  element  of  N  to 

the  octal  location  77^6l.   Therefore,  it  is  reasonable  to  conclude  that 

at  the  time  of  the  core  dump  the  instruction  at  location  10053p  was,  as 

it  should  have  been,  TXH  N- 

Line  lU6  is  an  AXT  **,h.      If  subroutine  DUMDCR  had  been  entered 

successfully  and  executed,  the  instruction  in  core  at  unrelocated  location 

00015o  should  contain  in  the  address  portion  the  two's  complement  of  the 

relocated  location  where  the  TSX  DUMPXR,^  (Line  99)  was  executed-   The 

TSX  DUMFXR, U  instruction  is  relocated  to  location  10052q-   The  two's 

complement  of  10052o  is  67726p.   The  Map  indicates  that  the  first  relocated 

octal  instruction  of  DUMPXR  is  at  location  10127o-   Therefore,  the  AXT 

u 

**,h   instruction,  containing  an  address  value  of  67726^  should  be  in 
relocated  position  10127g  +  15g  =  lOl^+i+g.   At  location  lOl^iU  of  the 
core  dump  (l)  is  the  octal  word  0771+00^67726-   Its  address,  67726,  is, 
indeed,  the  value  desired- 
Line  22U  indicates  that  the  variable  I  was  assigned  a  storage 
location  by  the  compiler  of  00121^=   What  actual  relocated  location  is  this 
and  what  value  is  in  I  at  the  time  of  the  core  diimp?  Line  322  of  the 
Map  shows  that  the  first  location  of  subroutine  PRINT  was  relocated  at 
location  10212g=   Now  10212q  +  121g  =  10333q  and  location  10333g  (Q) 
of  the  core  dump  contains  the  octal  word  OOOOO60OOOOO .   Since  I  is  a 
FORTRAN  integer  variable,  the  deci'      portion  of  this  word  shows  that 
at  the  time  the  core  was  dumped,  I  had  a  value  of  6. 


Date:  U/l^/o^ 

Section:  l   p  c 

Page:  ^5 
Change : 


Three  references  on  the  Map  are  left  to  be  described.   Line  325 
contains  the  references  (PROG)  li+^5^.  (SUBT)  75^10  and  (ERAS)  77^30. 

(prog)  refers  to  the  last  octal  location  in  core  needed  by  the 
user's  program,  the  user's  subroutines,  and  all  Library  routines  called  by 
these  programs  from  the  Library  tape.   (SUBT)  refers  to  the  lowest  octal 
location  in  high  core  needed  by  the  Loader  for  its  work  (Subroutine  Present 
Table).   These  two  values  will  approach  each  other  as  the  size  of  a  program 
increases.   If  they  meet  and  overlap,  an  error  message  will  be  printed 
out  to  the  user,  and  his  program  will  not  be  loaded  and  hence  not  executed. 
(ERAS)  is  the  octal  value  of  the  last  location  in  ERASABLE  (it  begins  at 
77U61q  for  FORTRAN  and  77777o  for  SCATRE  and  MAD)  used.   In  this  program, 
ERASABLE  or  COMMON  required  25  decimal  locations  (Lines  11  and  12).   The 
31  octal  locations,  when  subtracted  from  77U61q  give  the  value  at  (ERAS)  in 
Line  325  --  77^30g. 

It  is  possible  to  receive  a  Map  that  appears  unintelligible  from 
the  viewpoint  of  the  preceding  discussion.   This  occurs  in  those  relatively 
rare  occasions  when  a  user's  program  is  of  such  length  that  the  Map,  which 
is  constructed  at  the  end  of  the  user's  program,  overwrites  the  lower  portioii 
of  the  (SUBT)  table  (Line  325)-   As  this  condition  in  no  way  affects  the 
execution  of  the  user's  program,  the  nonsensical  MAP  is  printed  and 
execution  takes  place.   If  the  values  of  (PROG)  and  (SUBT)  are  close  but 
not  equal,  and  no  error  message  that  (PROG)  and  (SUBT)  overlap  has  been 
written,  and  an  unintelligible  Map  is  produced,  in  all  likelihood  the  above 
description  is  the  reason  for  the  condition  of  the  Map. 

Line  326: 

The  information  on  this  line  indicates  the  approximate  octal  value  of 
the  number  of  locations  that  are  at  the  user's  disposal  for  expansion  of 
this  program. 


I 
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Lines  327-3^1: 

These  lines  are  the  results  obtained  by  executing  statements  in  Lines 
208-211.   Line  13  specifies  that  the  data  from  four  cards  are  to  be  read 
into  core.   Line  lU  specifies  that  the  first  four  digits  from  each  card 
(columns  1-^)  are  to  be  converted  into  four  single-digit  integers.   Line  20- 
specifies  that  the  diagonal  elements  of  the  5x5  array  B  are  to  be 
printed  out  in  floating  point  format  (Line  209).   Line  210  specifies 
that  each  printed  diagonal  element  of  array  B  be  followed  by  the 
corresponding  printed  diagonal  element  of  array  N  in  integer  format 
(Line  21l).   Since  only  the  first  four  diagonal  elements  of  arrays  B  and  N 
contain  valid  information^  the  fifth  elements  printed  (Lines  3^0  and  3^1) 
are  the  respective  floating  point  and  integer  representations  of  the  core 
constant,  0071400^035^1- 

Line  3^2: 

This  message  indicates  that  the  last  instruction  executed  before  the 
core  dump  occurred  was  a  transfer  to  SYSERR,  the  System  Error  routine. 

Lines  3^3-383: 

This  portion  consists  of  the  information  provided  through  use  of  the 
$  DUMP  control  card  (Line  7)"   Line  3^3  contains  the  octal  contents,  at 
the  time  of  exit  from  execution,  of:  ACC  (Accumulator  Register  = 
+000000000001g ) ;  the  MQ,  (Multiplier -Quotient  Register  =  +3OOOOIOOI6060 ); 
IND  (Sense  Indicator  Register  =  +002100010006n );  IRl  (index  Register  1  = 
00005q);  IR2  (Index  Register  2  =  O0025o);  IR^  (index  Register  h  =   6772I0); 
and  -  IRU  (two's  complement  of  Index  Register  h  =   10057p)'   The  latter 
value  (l0057o)  is  very  useful  in  determining  the  last  point  at  which 
the  program  used  JRh.      In  this  case  octal  location  10057  (E^)  contains 
+007UOOUl0005p.   At  relocated  location  10005p  is  the  transfer  vector  entry 
(A6)  to  SYSERR  (Line  55)-   This  indicates  that  the  exit  via  SYSERR 
message  (Line  3^2)  was  an  exit  executed  by  the  user's  program  (Line  I06) 
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and  not  one  caused  by  an  error  in  the  program.   Line  3^^  contains ^  from  left 
to  right,  the  contents  of  IR3  (index  Register  3  =  00025p);  IR5  (index  Register 
5  =  OOOOOo);  IR6  (Index  Register  6  =  OOOOOg)  and  IR?  (index  Register  7  =  OOOOC 
Line  3^5  indicates  that  the  program  was  in  the  Floating  Point  Trap  Mode  at  the 
time  of  termination.   Floating  Point  underflow  or  overflow  would  have?  in  this 
situation,  produced  an  immediate  error  exit  with  the  condition  indicated 
to  the  user  in  an  error  message.   The  portion  of  the  core  generally  most 
valuable  to  the  user  is  reproduced  here. 

Upon  examination  of  any  full  dump  results,  it  will  be  noted  that 
some  information  given  in  the  dump  lies  below  and  above  the  limits  of 
the  user's  program.   For  example,  there  will  be  octal  instructions  above 
(PROG),  ll|i+5U  and  below  (ERAS),  77^30o.   This  is  due  to  the  occupation 
of  octal  locations  6o,000  to  70,000  and  upward  by  the  Monitor  and  Loader. 

Line  38O  illustrates  a  method  used  by  the  dump  routine  to  save 
printing  time.   When  a  line  in  the  dump  occurs  that  contains  one  value  in 
all  eight  locations,  and  that  value  appears  at  the  end  of  the  line  preceding 
and  at  the  beginning  of  the  line  following,  a  line  of  periods  is  substituted. 
Line  38O  indicates  that  the  octal  values  in  octal  locations  77^70  through 
777U7  were  all  +007l+0040354l,  the  core  constant. 

Line  38U : 

An  image  of  the  on-line  punched  time  card  is  given  here.   This  punched 
time  card  (not  returned  to  the  user)  is  used  by  the  Digital  Computer 
Laboratory  in  the  End-of -Month  bookkeeping  reports.   If  a  user's  computing 
is  supported  by  contract  funds,  the  billing  charges  are  determined  from  this 
card,  and  not  from  the  times  shown  on  Line  388.   Times  given  on  Line  38^ 
are  evaluated  in  thousandths  of  hours,  whereas  those  on  line  388  are 
evaluated  in  tenths  of  minutes.   A  breakdown  of  the  information  provided  in 
Line  38)4  follows. 

Col.  1  =  blank,  /,  or  T.   The  character  (/)  indicates  that  Low  Core 
has  probably  been  destroyed  and  the  indicated  time  may  not  be  accurate.   T 
indicates  that  the  total  time  is  greater  than  2  hours  and  that  something 
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may  be  wrong  with  the  'JlG   clock,  a  Program  Accounting  Clock  that 'is 
installed  on  the  IBM  'JI6   Printer  which  records  time  in  increments  of 
.01  minutes,  to  a  maximum  of  9999-99  minutes.   This  is  not  the  same 
as  the  Interval  Timer  located  in  storage,  which  counts  in  l/6oths  of 
a  second  to  a  maximum  of  approximately  l8.2  years. 

Col.  1    =  blank  '  "'   ' 

Cols.  2-5        =   Job  No.    =   SJ+63 

Col.  6  =  blank 

Cols.  7-18   =  NAME  OF  USER  =  FOSTER,  MERLE 

Cols.  19-24  =  Number  of  cards  read  from  input  tape  =  72-,  q 


Cols.    25-30  =   Niiinber   of  lines  written   on  output   tape  =    5o5 


10 


Cols.  31-35  =  Problem  Specification  Number  =  28012 

Col .    36  =  blank 

Cols.  37-^1  =  MAD  or  ALGOL  translation  elapsed  time  =  00.000^^, 

Cols.  k2-h6   =  Total  elapsed  time  =  00. OI8 

Cols,  i+7-51  =  Execution  time  =  00.010 


10 


10 


Cols.  52-56  =  FORTRAN  translation  elapsed  time  =  OO.OO6 

Cols.  57-61  =  SCATRE  assembly  elapsed  time  =  00.001 

Cols.  62-66  =  Department  (left-justified)  =  DCL 

Cols.  67-68  =  Month  of  run  =  12 

Cols.  69-70  =  Day  of  run  =30 

Cols.  71-72  =  Year  of  run  =  63 


10 


^^  ]      Time  in 
I      thousandths 
y      of  hours 


Line  385 '- 


This  line  is  a  duplication  of  Line  2  with  the  following  exceptions. 

The  user's  Problem  Specification  Number  (28012 )  is  inserted  after  the 

Job  Number  --  8^+63.    The  time  (716  Clock)  of  the  end  of  this  job  (lO  lU.20  / 

is  substituted  for  the  U  asterisks  and  Job  Number  --  SU63.   The  times  given 

here  are  accurate  to  tenths  of  minutes. 


Line  386: 

This  line  is  a  duplicate  of  Line  3- 
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Lin.  387- 33-°: 

This  information  is  a  means  of  presenting  the  user  with  a  rough  estimate 
of  the  time  his  problem  took  to  compile  --'k   {k   tenths  of  a  minute)  and 
assemble  --  .1  (l  tenth  of  a  minute),  to  execute  --  .6  (6  tenths  of  a  minute) 
and  a  charge  made  on  the  basis  of  these  figures  --  $U.   (at  a  rate  of  $200/lir.)' 
The  charge  is  a  rounded  estimate.   If  the  user  is  computing  under  a  Billing 
Number,  the  actual  charge  is  calculated  on  the  basis  of  the  punched  time 
card- (Line  38^)- 

It  will  be  noted  that  when  a  program  is  rejected  by  the  computer 
because  of  user  errors  in  the  coding  of  the  program  or  subroutines,  there  is 
still  an  indication  in  Line  388  that  execution  time  is  attributed  to 
this  problem.   Execution  time  includes  the  Monitor  time  used  in  scanning 
the  $  control  cards  (Lines  '+-9^  121  and  200-202),  rewinding  tapes, 
bookkeeping,  etc. 

Line  389: 

This  line  provides  advice  of  pertinent  laboratory  notices,  and  changes  from 
time  to  time.   At  times  an  additional  notice  may  appear  to  the  user.   This 
is  directed  to  the  individual  user  receiving  it,  and  informs  him  that 
his  Problem  Specification  number  is  due  to  expire  in  less  than  2  weeks. 
This  message  may  appear  at  any  time  within  that  period  and  does  not 
imply  that  the  user  has  2  weeks  from  the  time  of  its  first  appearance. 
It  is  possible  that  the  user  may  not  submit  a  run  within  the  2  week 
period  except  on  the  13th  day.   His  job  would  be  deleted  on  the 
following  day  because  of  an  "Illegal  Problem  Specification"  if  a  run  were 
to  be  made  then. 
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The  Page  of  Asterisks,  Line  39Q  and  following: 

This  page  is  utilized  to  aid  the  Routing  Room  in  quickly  preparing 
output  for  the  users.   It  contains  information  regarding  punched 
output  cards  which  may  have  been  generated  and  are  to  be  returned 
to  the  user.   These  cards  can  be  a  result  of  a  $  POTCH  OBJECT  Control 
card  (Line  202)  or  may  be  results  punched  out  during  execution.   When 
such  is  the  case,  each  line  of  asterisks  on  this  page  will  be  preceded 
by  the  number  of  cards  that  are  punched  --  6  CARDS.   If  no  punched  output 
is  forthcoming,  the  page  contains  asterisks  with  a  message  at  the  bottom 
--NO  PUNCHED  OUTPUT. 

U.2.5.3.   Punched  Output 

The  following  discussion  is  a  continuation  of  that  begun  in  the 
preceding  section.   References  to  lines  are  to  the  same  listing  (figure  ^.3) 
referred  to  in  that  section.   Card  images  referred  to  follow  this  section 
(Figure  k.k). 

Line  202  indicates  that  a  column  binary  punched  card  deck  is  desired 
for  the  subroutine  PRINT.   Figure  h.k   shows  the  images  of  the  6  cards  indicated 
on  the  page  of  asterisks  that  were  received  as  punched  output.   Upon  removal  of 
all  BCD  cards  (indicated  by  an  absence  of  7  and  9  punches  in  column  l),  this 
column  binary  deck  can  in  a  future  run  be  substituted  for  the  cards  (Lines  200-21U) 
of  the  routine  from  which  they  were  produced;  with  the  exception  that  lines  200-319 
would  not  be  present  on  the  printed  output,  the  program  would  run  as  it  has  on  this 
run.   The  advantage  of  using  a  column  binary  deck  is  that  no  compilation  is  needed; 
thus  time  on  the  computer  is  shortened.   In  this  particular  run,  the  punched  cards 
included  a  yth  card  (not  shown  here).   This  card  contained  punches  on  all  80  colunms 
in  rows  0,  1,  h,    5>  8^  and  9^  and  is  a  separator  card  punched  by  CHAOS  to  separate 
decks  of  punched  output.   It  generally  is  returned  to  a  user,  but  should  be  discarde 
It  must  not  be  included  as  a  part  of  a  column  binary  deck  to  be  rerun  on  the  compute 
It  will  not  be  included  in  the  value  (6)  indicated  on  the  page  of  asterisks  giving 
the  number  of  cards  returned  to  the  user. 
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CarclJ. 

The   fiJ"st   card    is   a  duplicate  of  the   information  given  on  Iiine  2o5   with  the 
addition  of 'the   I'roblera  Specif  ication  ITumberv'-  Geris^rallyi,  '  inlced^  on- thi's 
card  will  be  the   Job.'    Mura'ber.      0?liis   ca,rd  is  tohly  an-  identificalion  card 
and  should  be  -discarded;    it  must   not  be  resubmibtedi /with'the,:.  coiuimi.i.binary 
cards  that   it  precedes. 


Card  2 


The  second  card  is  a  column -binary  Program  Card  and  must  precede  any  column 

binary  relocatable  instruction  cards.   Its  distinguishing  punch  is  the 

12  punch  in  column  1.   The  distinguishing  punches  that  indicate  that  it,  and 

all  column  binary  cards,  are  binary  are  the  7  and  9  punches  in  column  1. 

Three  columns  make  a  36-bit  binary  word  on  a  column  binary  card. 

The  columns  are  read  from  top  to  bottom,  from  left  to  right.   A  punch 

represents  the  binary  digit  1;  no  punch  represents  a  0.   A  36-bit  binary  word 

ca.n  be  converted  to  a  12-digit  octal  word  by  grouping  each  3  binary  bits 

into  an  octal  digit.   Columns  1-3  would  be  (in  binary)  100  000  000  101 

000  100  000  000  000  000  000  000.   In  octal  this  vrord  is  U0050i|000000. 

When  any  relocatable  binary  deck  is  submitted  in  lieu  of  a  BCD  deck, 

two  things  are  important.   No  cards  that  do  not  contain  7  and  9  punches 

should  be  included,  and  each  relocatable  binary  deck  must  be  preceded  by 

a  Program  Card  (12  punch  in  column  l).   The  binary  information  in  column  binary 

decks  appears  in  columns  1  thru  72  {2k   binary  words).   Columns  73-80 

are  in  BCD  and  contain  (unless  user  identification  has  been  supplied)  in 

columns  73-77  the  user's  Problem  Specification  number.   Columns  78-8O 

contain  a  sequential  ascending  count  beginning  with  the  value  in  columns 

78-80  of  the  Program  Card.   Columns  of  interest  to  the  user  on  the  Program 

Card  are : 


WORD   3 


Column  7> 
ColTimn  8, 


Rows  1  -  9j 
Rows  12-3; 


No.  of  Transfer  vector  entries  in  this 
routine  =  000  000  000  000  010  =  00002g 
(Lines  233  and  2U0,  2^+1) 
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WORD  3    Column  8,  Rows  7-9, 

Column  9,  Rows  12  -  9: 

WORD  h          Colimn  10,  Rows  1-9, 

Column  11,  Rows  12-3= 

WORD  h          Column  11,  Rows  7-9, 

Column  12,  Rows  12-9: 

WORD  5    Column  13,  Rows  12-9, 

Column  ik,  Rows  12  -  9, 

Column  15,  Rows  12-9: 


An  octal  number  equal  to  the  length  of 
this  program  (Program  Break)  = 

000  000  001  010  010  122g  (Line  2l8)* 

Unrelocated  location  of  first  element 

of  transfer  vector  =  000  000  000  000  000  = 

OOOOOg  (Lines  233  and  2^0) 

Lowest  address  used  in  ERASABLE  or  COMMON. 

Zero  if  no  ERASABLE  or  COMMON. 

=  111  111  100  Oil  000  =  77^30q  (line  2l8) 

If  the  program  is  a  MAIN  program  this  word 

will  be  zero;  If  it  is  a  subroutine,  it 

contains,  in  BCD  octal  representation, 

the  name  designated  as  the  Primary  Entry 

Point  (Line  245)  100  111  101  001  Oil  001 

100  101  110  Oil  110  000  =  1475131^563600  = 

PRINT  ** 


*The  Program  Break  will  include  any  dimensioned  arrays  not  declared  in  COMMON. 
For  example.  Line  11  dimensions  N  and  B.   Line  12  declares  N  to  be  in  COMMON. 
The  B  array  requires  25-,q  or  3I0  locationso   The  actual  program  extends  through 
75o  or   61   (Line  120).   The  25   locations  of  B  occupy  locations  75o  "to 
1260  (Line  32).   This  program  is  loaded  at  location  10000   (Line  322)  and  the 
following  subroutine  DUMPX3R  is  loaded  in  at  location  10127g  (Line  322). 
The  last  word  of  the  main  program  (Line  120 )  would  be  relocated  at  location 
10075g  (lOOOOp  +  75g)'   The  remaining  31n  (25-,  p,)  locations  are,  in  effect, 
reserved  for  array  B.   As  these  locations  are  only  set  aside  but  not  cleared, 
their  contents  initially  consist  of  the  core  constant  OO7I4OOI+O3541  (F).    .:  .. 


**  See  Appendix  B  for  a  complete  listing  of  BCD  codes  for  the  709^- 
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WORD  b    Column  17,      Rows  7  -  9> 
Column  18,   Rows  12  -  9: 


Unrelocated  address  of  primary  entry  point  = 
000  000  000  000  110  =  000060  (Line  2h6) 
Words  7o-10o^  llo-12oj  etc.  contain^  in 
the  same  layout  as  words  5-6,  any  additional 
BCD  symbols  associated  with  entry  points  in 
the  odd-n\irabered  word  and  its  associated 
unrelocated  entry  address  in  the  even- 
numbered  word. 


CARD  3 

The  third  card  is  a  column  binary  relocatable  instruction  card,  as  are  those 
which  follow.   It  is  distinguished  from  a  Program  Card  by  an  11  punch  in 
column  1.   It  too  contains  7  and  9  punches  in  column  1.   The  first  column  binary 
relocatable  instruction  card  will  contain  the  transfer  vector  in  words  5,  6 
etc.  until  all  transfer  vector  entries,  as  enumerated  in  word  3  on   the  Program 
Card  (2  in  this  case),  are  accounted  for.   Word  1  (Rows  7-9  in  column  2  and  12-9 
in  column  3)  contains  the  unrelocated  octal  address  of  the  location  in  which 
to  begin  loading  the  instructions  on  this  card  (OOOOO).   Words  3  and  h   contain 
the  relocation  bits  (see  section  '+.2.5'2).   Rows  12  through  3  in  column  2  contain 
the  binary  value  of  the  number  of  instructions,  including  the  transfer  vector, 
that  are  on  this  card  =  010  100  =  2Ug  =  20  . 


TRANSFER 

Word  5 

VECTOR 

ENTRIES 

Word  6 

Instruction  -  Word  ik 


8 


=  111  100  110  010  110  Oil  Oil  000  Oil  100  110  000  = 

7U6263303U60g  =  (sth)  --  (Line  2U0) 
=  111  100  010  no  on  ooi  loo  on  on  loo  no  ooo  = 

7^263l433i+60g  =    (FIL)      --      (Line  2^+1) 

=  100  no  on  loo  ooo  ooo  oio  ooo  ooo  ooo  ooo  on  = 

U63i+00200003Q  =  SXD  $n,  2  —  (Line  2U7)  =  (k)  in 
core  dump  listing  ( -O634OO2OOOO3  +  10212).   This 
is  the  actual  instruction  on  the  card  relocated  by 
the  amount  indicated  in  the  Map  (Line  322). 

The  instructions  on  this  card  are  the  binary  equivalents  of 

— — — T.i np.<^  pUq-PSQ  in  the  object  listing  of  subroutine  PRINT. 
Date:     k/l<^/6k  "^ 
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Page: 
Change : 


U.2.5- 


Card  h 

The  second  relocatable  instruction  card  (card  h)   of  this  program  continues  in  words 
5g  through  3O0  the  binary  instructions  of  the  program.   Rows  7-9  in  column  2  and 
rows  12-9  in  column  3  (OOO  000  000  010  100  =  0002Uq)  indicate  that  these 
instructions  are  to  be  loaded  starting  at  the  unrelocated  address  OOO2U0  (20  decimal 
locations  above  those  on  the  preceding  instruction  card).   Rows  12-3  in  column  2 
indicate  that  there  are  2^  octal  or  20  decimal  instructions  on  this  card.   These 
instructions  include  those  in  Lines  26O-280  of  the  object  listing  of  the  PRINT 
subroutine  with  the  exception  of  the  unassigned  BSS  in  Line  273-   These  two  cards 
now  provide  ko   words  or  instructions  of  the  77  words  listed  in  lines  2^0-319- 
The  words  in  Lines  273^  295  and  297  do  not  appear  on  the  relocatable  instruction 
cards. 

Card  5 

The  third  relocatable  instruction  card  (Card  5)  indicates  that  there  are  20 

^  10 

instructions  to  be  loaded  (rows  12-3^  column  2)  and  that  they  are  to  be  loaded 
beginning  at  the  unrelocated  address  of  0050n  (rows  7-9  in  column  2  and  12-9  in 
column  3)-   This  card  contains  the  binary  instructions  in  Lines  28I-302,  with  the 
exception  of  Lines  295  and  297.   60  ^  of  these  77   instructions  for  the  PRINT 
subroutine  are  accounted  for  on  these  three  cards. 


Card  6 


The  last  relocatable  instruction  card  (Card  6)  of  this  subroutine  contains  17-,^ 
instructions  (row  12-3  in  column  2);  these  instructions  are  to  be  loaded  beginning 
at  the  unrelocated  location  0007^o  (rows  7-9  in  column  2  and  12-9  in  column  3)- 
These  17-,  p,  binary  instructions  constitute  the  remainder  of  the  instructions  in 
this  program.   There  is  a  total  of  77-10  °^   '^"'"^8  instructions.   They  were  loaded 
starting  with  unrelocated  location  OOOOOo-   Therefore,  the  length  of  the  program 
should  be  00115o'   However  the  Program  Card  (Word  3  column  8,  rows  7-9  and  column  9) 
indicates  that  the  length  of  the  program  is  122o.   The  discrepancy  is  due  to  the 
presence  of  storage  locations  provided  by  the  compiler  in  the  compilation  of  the 
program  for  the  program's  temporary  storage.   Therefore,  when  this  subroutine  is 
loaded  into  core,  the  next  program  or  subroutine  needed  (if  any)  will  be  loaded 
beginning  122o  locations  from  the  first  loaded  word  of  subroutine  PRINT  and  not  115o 
locations  from  the  beginning. 


Date: 

Vl5/6^ 

Section: 
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Change : 

Figure  k.k 
CARD   1  (This  was  reproduced  to  interpret  it) 
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DATA  READ  IK 


i;- 


lATA 
II  I 


^ 


0000 
1:34 

int 
2I22 

33|3 

4441 

5555 

6666 

7777 

8888 

9999 
I  2  3  4 


OOODOOOOO 

S  I  7  S  9  10  II  12  I] 

111111111 

222222222 
333333333 
444444444 

555555555 
666666666 
777777777 


999999999 

5   I    7   8    9  to  11  12  13 
luSOSI 


0  0  0  D  0  D  0  0  3  n  G  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  0  D  0  0  0  0  0  0  0  I!  r  r  §  0  0  0  0  0 

14  15  It  17  II  11  20  21  22  ; ;  .'I  7S  2t  77  21  2a  10  31  31 13  34  3S  3«  37  ]<  3t  4a  41  42  43  U  43  4(  47  41  41  U  SI  S2  S3  M  »  S(  57  M  S9  eo  (1  12  t3  S4  (5  »  (I  ES  69  II  '^  .  7;  »  T"  'O 

1  n  1 1 1 1 11  n  1 11 1 11 1 1 1 1 1  n  1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1  n  1 1 1 1 1 1 1 1 1 1 1 1 1 1  n  1  ^  1 31 1 1  n 

2222227222222222222222222222222222222222222222222222222222222222222 
3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  3  1 3  3  3  3  3 
44444444444444444444444444444444444444444444444444444444444I4444444 

5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5  5 
666666866666666666  66666666666666  666666666666666  66666666666666666666 
7777  777  777  777  7  777777  7777777  777777777  77  7777777  7  7  777777  7  77  77  7  777777  77 
8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  1 8  8  8  8  8  8  8  8  8  8  8  8  8  8  8  f!  3 
999999999999999999999999999999999999999999999999999999999999999SS99 

H  IS  1$  17  IS  n  20  21  22  23  24  25  2S  27  2(  20  30  31  32  33  34  3S  3t  37  31 3<  40  41  42  43  44  45  48  47  49  41  so  51  52  S3  54  Si  56  57  51  59  SO  81  62  (3  S4  6S  66  67  68  63  10  71  73  73  74  75  /6  77  78  79  BO 


It  will  be  noted  that  in  cards  2  ajid  3  above,  the  data  iB  column  5 
card  2,    and  columns  5-6  card  3^  are  ignored  by  the  READ  statement  in 
Line  13- 


Vl5/6i+ 


4.2.5 


Page  i^S 


k.2.6.    The  Multiple  Core -Load  Job:   PING-PONG 

h.2.6.1.    General 

Ping-pong  is  the  process  of  calling  and  executing  several 
self-contained  programs  (core-loads)  in  one  job.   Each  core-load  consists 
of  a  main  program  and  its  subroutines^  which  may  be  in  relocatable  binary 
or  symbolic  source  language  form. 

Variables  which  are  referenced  by  more  than  one  core-load 
should  be  allocated  to  C0MM0N  storage  (FORTRAN),  ERASABLE  storage  (MAD  and 
SCATRE),  or  PR0GRAM  C^MMjZSN  storage  (MAD  and  SCATRE). 

k.2.6. 2,    Deck  Set-Up 

Each  core-load  in  a  ping-pong  deck  must  be  followed  by  either 
a  $  BREAK  control  card  or  a  Binary  Transition  card.  See  section  k.2.6.h. 
The  Monitor  will  generate  a  Binary  Transition  card  for  each  $  BREAK  in  the  deck. 
These  Binary  Transition  cards  will  also  be  punched  and  returned  to  the  user 
whether  or  not  $  PUNCH  0BJECT  cards  v^ere  included  for  the  core-loads. 

The  set-up  of  the  core -load  preceding  the  $  BREAK  or  Binary 
Transition  card  is  subject  to  the  same  rules  as  a  single  core-load  job 
with  the  exception  that  the  $  DATA  control  card  must  follow  all  programs; 
i.e.^  the  $  DATA  card  followed  by  data  follows  all  the  core-loads,  not 
a  set  of  data  following  each  core-load. 

U.2.6.3.  How  the  System  Handles  Ping-Pong  Jobs 

1.   Core-loads  are  processed  sequentially  by  the  system, 
prior  to  any  execution,  according  to  the  $  control  cards  which  precede  them; 
symbolic  decks  will  be  assembled  or  compiled,  and  object  programs 
printed  and  punched.   Whether  or  not  PUNCH  0BJECT  is  requested,  the  object 
programs,  consisting  of  relocatable  binary  card  images,  are  written  on 
logical  tape  3  (the  execution  tape)  as  they  are  generated.   Portions  of 
core-loads  which  occur  in  the  deck  in  the  form  of  relocatable  binary  cards 
are  copied  directly  onto  logical  tape  3  whenever  they  are  encountered  but 
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only  if  a  $  G0  occurred  in  the  first  group  of  $  control  cards  (binary 
cards  are  ignored  by  the  Monitor  if  execution  is  not  requested  or  is 
deleted  by  an  unsuccessful  translation).   A  core-load  can  of  course  consist 
entirely  of  binary  cards. 

2.  Each  core -load  on  logical  tape  3  will  be  followed  by  a 
Binary  Transition  card  (see  section  h.2.6.2). 

3.  If  G)^  was  requested  and  no  fatal  errors  were  encountered 
during  processing,  the  Monitor  writes  an  end-of-file  mark  on  tape  3  and  calls 
in  the  Loader  to  load  the  programs  from  tape  3  into  core  for  execution. 

k.      The  Loader  loads  the  first  core-load  from  logical  tape  3 
into  core,  relocating  it  properly  and  obtaining  the  necessary  subroutines 
from  the  subroutine  library.   After  loading  has  been  completed,  the  Loader 
generates  a  loading  block  (see  section  ^.2.6.5)  for  the  program  currently 
in  core  and  wi^ites  it  and  an  image  of  the  core  contents  on  a  tape  all  as 
one  record.   "Core  contents"  in  this  case  refers  to  the  locations  from  the 
beginning  of  the  user's  program  to  (PR0G),  the  program  break,  inclusive,  as 
specified  on  the  map  generated  by  the  Loader. 

The  Loader  then  repeats  this  process  for  all  the  core-loads 
which  are  stacked  on  the  execution  tape.   (The  tape  on  which  the  Loader 
stacks  the  core  images  is  ordinarily  logical  tape  2,  although  the  user 
may  specify  certain  others.   See  section  k.2.6.h   for  formats  of  $  BREAK 
and  Binary  Transition  cards. 

5.   After  all  loading  and  stacking  has  been  performed,  the 
Loader  writes  an  End-of-Tape  record  on  all  tapes  used  for  stacking  (normally 
tape  2).   The  End-of-Tape  record  is  identified  by  77777o  in  the  address 
of  the  first  word. 

The  Loader  then  reads  in  the  core  image  generated  by  the  first 
core-load  in  the  deck  and  transfers  control  to  it. 

NOTE:   The  process  which  has  just  been  described  presumes  that  the  user 
has  submitted  his  entire  job  in  the  form  of  punched  cards  and  that  therefore 
his  core-loads,  in  their  entirety,  will  be  on  the  input  tape.   Some  users 
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may  have  a  reserved  tape  which  contains  binary  card  image  core-loads  as 
described  for  logical  tape  3  in  1.;,  2.;,  and  3-  above.   Therefore  a  means 
exists  for  telling  the  Loader  to  create  a  (portion  of  a)  core-load  from  a 
tape  other  than  the  execution  tape  by  including  in  the  input  deck  Binary 
Transition  cards  with  an  appropriate  punch  in  column  9-   See  Binary 
Transition  card  format  below. 

h.2.6.k.    Formats  of  $  BREAK  and  Binary  Transition  Cards 
1.   $  BREAK 

Cols.  Contents 

1  $ 

2-72  (anywhere)  BREAK  (n) 

where  N  is  a  logical  tape  number,  one  of: 

2,   h,    9 
This  card  is  used  to  indicate  the  end  of  a  core-load.   The 
logical  tape  number,  N,    specifies  the  tape  on  which  the  Loader  is  to  write 
the  core  image  record  of  the  core-load.   $  BREAK  without  the  "(n)"  will 
cause  the  Loader  to  write  the  core  image  onto  logical  tape  2.   (Note  that 
the  Loader  does  not  read  the  $  BREAK  card;  it  reads  the  Binary  Transition 
card  generated  by  the  Monitor  and  written  on  tape  3)- 


2. 

Cols. 

— 

Contents 

1 

+,  1,    9 

2-5 

blank 

6 

N 

7,8 

blank 

9 

M 

10,11 

blank 

12  (optional) 

P 

13-72 

blank 

where  N  is  a 

logical  tape  number 
2,  h,    9 

,  one 

of: 

M  is  a  logic 

al  tape  number,  not 

ident 

ical  with  N, 

and  one  of 

2, 

3,  ^,  1,   9 
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and  P,  used  only  and  optionally  with  col.  6,    is  a  "l"  or  a  "2". 

a)  When  the  Loader  detects  a  tape  number  (w)  in  col.  6,    it 
writes  the  current  contents  of  core  as  a  record  on  tape  N  and  proceeds  to 
read  another  binary  card  image  from  the  tape  from  which  it  is  currently 
loading.   (This  is  ordinarily  tape  3;  the  execution  tape,  but  may  be  a  tape 
(m)  designated  by  the  user.   See  b)  below). 

b)  When  the  Loader  detects  a  tape  number  (m)  in  col.  9j  it 
continues  reading  and  relocating  (into  core)  instructions  from  relocatable 
binary  card  images  on  tape  M. 

NOTE  1:   Reading  and  relocating  from  tape  3>    or  tape  M  continues  until  an 
E0F  mark  is  encountered  on  one  of  those  tapes.   All  loading  is 
then  terminated  and  execution  will  being.  ,(See  3  in  section 
k.2.6.3     How  The  System  Handles  Ping-Pong  Jobs). 

NOTE  2:   l)   if  cols.   6  and  9  a^re  both  blank,  the  current  core  contents  are 
written  on  logical  tape  2  and  loading  of  another  core-load  will 
continue  (from  tape  3  or  previous  tape  M); 

2)  if  col.  6  is  blank  and  col.  9  is  non-blank,  loading  into  core 
continues  from  tape  M  (in  col.  9)^  no  core-load  is  v/ritten  on 
tape  2; 

3)  if  col.  6  is  non-blank  and  col.  9  is  blank,  the  current  core 
contents  will  be  written  on  tape  N  (in  col.  6)  and  loading  of 
another  core-load  will  continue  (from  tape  3  or  a  previous  tape  M); 
h)      if  col.  6  and  9  ^-^e  both  non-blank,  the  current  core  contents 
will  be  v/ritten  on  tape  N  (in  col.  6),  and  loading  of  another  core- 
load  will  continue  from  the  tape  M  designated  in  col.  9- 

c)  When  the  Loader  detects  a  "1"  in  col.  12,  it  searches  for 
an  End-of-Tape  Record  on  the  tape  specified  in  col.  6  and  replaces  it  by 
the  current  contents  of  core.   Thus  the  user  may  have  a  reserved  (and 
previously  generated)  ping-pong  tape  mounted  for  his  job  and  add  a  core- 
load  to  it. 
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d)  When  the  Loader  detects  a  "2"  in  col.  12,  it  searches 
for  an  End-of-Tape  Record  on  the  tape  specified  in  col.  6  and  replaces  the 
core-load  before  it  by  the  current  core  contents,  deleting  the  End-of-Tape 
Record. 

h.2.6.%    Loading  Block  Description 

A  loading  block  is  generated  by  the  Loader  for  each  core-load 
in  a  ping-pong  job;  the  loading  block  consists  of  the  first  five  words  of 
the  core-load  record  on  tape  and  is  not  loaded  into  core  with  the  core-load 
at  execution  time.   It  is  used  by  the  subroutines  SEQPGM  and  SELPGM  for 
locating  and  loading  the  core-load  at  execution  time. 

Loading  Block  Format : 

Word  No.  Contents 

1  .     ,      PZE       IDENT,,CC 

2  TTR       ENTRY 

3  (Checksum) 

k  .  •       .  STO       L0ERAS,D,PGMBRK 

5      •  I0RT      1STL0C,,N 

where  LDEWT  is  the  record  number  of  the  core-load  on  the  tape  (IDENT  =  1 
for  first  core-load,  IDENT  =  5  for  fifth  core-load,  etc.);  CC  =  number  of 
channel  commands  in  the  loading  block  for  loading  the  core-load  (CC  =  1 
for  all  system-generated  ping-pong  core-loads);  ENTRY  =  location  in  core- 
load  to  which  to  transfer  after  core-load  is  read  in;  word  3  contains  a 
checksum  of  all  the  words  in  the  record  excluding  the  checksum  word  itself; 
word  ^  is  a  diunp  flag  word  for  the  system  to  use  if  the  execution  of  the 
core-load  should  terminate  via  SYSERR : 

SVN  indicates  dump  flag  word; 

PGMBRK       highest  location  of  user's  program  to  be  dumped; 

D  D  represents  the  3  bits  of  the  tag,  b  b  b  : 


b-,  =  1  if  $  1/0  DUMP  card  in  job  deck; 
bo  =  1  if  $  LIBDUMP  card  in  job  deck; 
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b  =  1  if  $  DUMP  card  in  job  deck; 

b2  and  b  =  1  if  $  FULL  DUMP  card  in  deck 

and  the  Problem  Specification  has  FULL  DUMP 

permission; 
L0ERAS       lowest  location  assigned  to  Erasable  storage; 
word  5  is  the  channel  command  used  to  read  in  the  core-load: 

ISTL0C       location  into  which  word  6  of  the  record  will 

be  read; 
N  number  of  words  in  the  core-load. 


U.2.6.6.  How  A  Ping-Pong  Job  Executes 

The  first  core-load  to  be  executed  will  be  the  first  one 
physically  in  the  job  deck.   The  order  of  execution  of  succeeding  core- 
loads  is  determined  by  the  execution  in  the  core-loads  of  instructions 
generated  by  one  of  the  following  statements: 

CALL  SEQPGM   (N) 

CALL   SEQPGM 

TXH     N 

EXECUTE  SEQPGM.   (n) 

CALL  SELPGM  (IDENT^N) 

CALL   SELPGM 

TXH    IDENT 

TXH    N 

EXECUTE  SELPGM.  ( IDENT, N) 

where  N  is  the  logical  tape  number  of  the  tape  which  contains  the  desired 

core-load  {2,    3^  ^>    9)  ^^'^   IDENT  is  the  record  number  of  the  core-load 

on  tape  N.   NOTE:   N  may  be  omitted  if  the  desired  core-load  is  on  tape  2. 

SEQPGM  reads  and  transfers  control  to  the  next  core -load  in  sequence 

from  tape  N  (or  tape  2  if  N  is  omitted).   If  SEQPGM  encounters  a  Loader  End-of-Tape 

record,  it  reads  and  transfers  control  to  the  first  core-load  on  tape  N. 

SELPGM  reads  and  transfers  control  to  the  core-load  with  the  desired 

IDENT.   If  such  an  IDENT  has  not  been  defined  for  this  job,  execution  is 

terminated  via  SYSERR. 
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(FjZiRTRAN) 
( SCATRE ) 

(MAD) 

(FjZJRTRAN) 

(SCATRE) 


(MAD) 


k.3'      Jobs  Not  Run  Under  System  Control 

ll-.3'l«  General 

If  the  user ' s  program  cannot  be  run  under  system  control  and  he  has 
secured  Relinquish  permission  on  his  problem  specification,  then,  upon  request, 
the  entire  709^-lUOl  complex  will  be  made  available  to  his  program.   The  equipment 
will  be  operated  by  a  regular  operator;  hence  full  instructions  for  operation 
must  be  written  for  the  operator.   Such  non-system  jobs  are  called  "relinquish"  job; 
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U.3.2,  Submitting  the  Relinquish  Job 

The  Relinquish  job  must  be  submitted  by  the  same  general  procedure  as 
for  system  jobs.   If  cards  are  involved;  they  should  be  preceded  by  a  Problem 
Run  Card,  properly  filled  out  and  marked  as  a  Relinquish  job.   In  addition,  for  any 
Relinquish  job  a  special  form  (see  Figure  U. 3)  must  be  completely  filled  out  and 
submitted  with  the  job.   This  form  must  contain  all  the  information  needed  by    "' 
the  operator  to  successfully  run  the  job.   Instructions  on  operation  of  the  709^ 
must  be  clearly  and  concisely  stated.   All  legal  (expected)  stops  and  action 
to  be  taken  at  each  must  be  noted;  otherwise,  the  operator  will  terminate  the  job 
with  a  core  dump  upon  the  appearance  of  an  unexplained  stop. 

Separate  decks  which  comprise  one  job  should  be  clearly  marked  on  the  top.. 
and  front  of  each  deck.   References  in  the  operating  instructions  to  these  decks  . 
should  use  the  same  names  as  those  on  the  decks.  

If  the  job  requires  lUOl  preparation  or  processing  which  cannot  be 
handled  by  CHAOS  (see  section  i4-.2.^),  the  user  must  also  submit  the  1^01  library 
program  number  and  title,  or  the  1^01  program  deck,  and  complete  operating  instruction 
for  that  program.   All  stops  which  may  occur  and  action  to  be  taken  for  each  must 
be  included.   If  the  lUol  program  requires  control  cards,  the  user  must  include 
them  with  his  job.   Write-ups  of  available  l401  programs  may  be  examined  in  the 
Consultants'  Office,  Room  111b  ERL.  '  -   .     . 

The  standard  density  of  magnetic  tapes  at  the  709^  installation  is  8OO 
bits  per  inch  (bpi).   If  a  Relinquish  user  has  acquired  tapes  from  another  installatioi 
the  tapes  may  possibly  be  written  at  a  lower  density.   If  this  is  the  case,  and  the 
user  expects  to  use  the  tapes  more  than  one  time,  then  he  must  have  the  tapes  copied 
at  the  higher  (8OO  bpi)  density,  and  he  should  take  this  additional  tape  requirement 
into  account  when  planning  his  project.   Magnetic  tape  acquisition  is  discussed 
in  section  2.U.2,  and  tape  copying  in  section  U.2.2.5«        ■  •. — 
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Relinquish  Instructions 
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'  Name 

Prob. 

Spec. 

Date 

Est.  Time  of  Run.  Mins. 
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i  nel 

Tape  Unit 

' 

1 
1 

'■  „_^A_  _j 

Density 

I 

i  Chan- 
I  nel 

Tape  Unit 

1   B 

Density 

Printer 

r      Punch        n       ' 
1— t                 "-^ 

Load  Cards 

O      Load  Tape    C 

l^iOl  Special 

Instructions: 

i 

;   709^+  Special 

Instructions 

(Be 

sure 

to 

11 

St 

all 

halts 
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Figure  U.3' 


Final  Halt 


Disposition  of  tapes: 

! 

1 

TAPE 

PUNCH 

PRINT 

SAVE 

1 

i 

• 

i 

1 

U.3.3'  Categories 

The  Relinquish  jobs  do  not  form  a  separate  category^  as  defined  in 
section  ^.2.3'^  but  are  run  along  with  the  system  jobs.   It  is  the  responsibility 
of  the  user  to  properly  categorize  his  Relinquish  job^  following  the  definitions  of 
the  several  categories  in  section  k.2.3- 

Every  Relinquish  job  is  considered  to  have  special  requirements;  hence, 
only  Categories   III,   and  IV  are  open  to  Relinquish  jobs. 
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1|.3'^»  Assistance 

The  consulting  services  (see  section  1.2.1)  of  the  laboratory  are  available 
to  relinquish  users.   Relinquish  users  should  not,  however,  expect  help  of  the  same 
competence  concerning  a  totally  different  system  as  would  be  available  concerning 
the  PORTHOS  system.   It  is  beyond  the  scope  of  the  present  consulting  services 
even  to  approach  a  level  of  familiarity  with  another  system  which  would  permit 
consultation  amounting  to  the  maintenance  of  that  system. 

The  consulting  services  of  the  laboratory  will  be  available  to  the  extent 
possible  to  the  user  who  is  in  the  process  of  converting  a  program  to  operate  within 
the  PORTHOS  system. 

Persons  using  the  LP/90  system  may  request  use  of  the  Laboratory's  LP/90 
system  tape  for  their  runs.   Users  of  other  large  programs  should  take   the  necessary 
steps  to  acquire  their  own  program  deck  or  tapes,  usually  by  leasing  tapes  from 
the  Laboratory. 

In  any  instance  when  a  user  feels  a  need  for  extended  service  by  the 
Laboratory  he  should  communicate  his  needs  formally  to  the  Laboratory  so  that  due 
consideration  can  be  given  to  them  or  so  that  attempts  to  acquire  facilities  for 
the  service  can  be  made. 
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5.   The  Subroutine  Library 
5.1-   General 

The  Digital  Computer  Laboratory  has  organized  and  is  constructing  a 
library  of  routines^  complete  programs,  and  subroutines  for  carrying  out  various 
mathematical,  statistical,  and  data  handling  procedures.   Some  of  these  routines 
originate  within  the  Laboratory  but  others  are  being  acquired  by  exploiting 
the  great  amount  of  programming  which  has  been  done  for  IBM  700  and  7000  series 
machines.   All  routines  available  to  users  are  being  gathered  into  a  single  library 
classified  in  a  uniform  fashion  described  below.   This  classification  scheme 
is  compatible  with  an  extension  of  that  used  by  SHARE,  the   co-operative 
organization  of  IBM  7OO/7OOO  users. 

Those  routines  of  the  Digital  Computer  Laboratory  Library  which  are 
most  heavily  used  have  been  incorporated  into  the  Master  System  tapes  in  such  a 
way  that  they  will  be  automatically  available  for  insertion  into  programs  produced 
by  the  compilers,  assemblers,  and  other  subsystems  that  make  up  the  Master  System. 
The  rest  of  the  library  resides  on  cards  for  manual  insertion  into  programs  by 
the  users. 

Each  routine  is  to  be  assigned  a  number  made  up  of  five  parts: 

i  -  Classification  Code  -  One  letter  and  one  number  designating 
the  primary  and  secondary  class  to  which  the  routine  belongs 
according  to  the  SHARE  classification, 
ii  -  Installation  Code  -  Two  or  three  letters  identifying  the  origin  of 

the  routine  (MU  =  MJRA;  UOI  =  University  of  Illinois;  BC  =  University 
of  California,  Berkeley;  etc ) 
iii  -  Internal  Identification  Code  -  These  four  characters  v/ill  be  used  to 
identify  the  routine  semi-mnemonically. 
iv  -  Serial  Niunber  -  A  simple  sequence  number  which  advances  by  one  for 
each  routine  added  to  the  library. 
V  -  Characters  describing  the  language  in  which  the  program  is  available: 

F  -  FORTRAN 
A  -  ALGOL 
M  -  MAD 
S  -  SCAT  or  SCATRE  ( RiU^L-S^aatioIiO 
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Z  -  SQUOZE  (Compressed  Symbolic) 
B  -  Binary  (Absolute) 
R  -  Binary  (Relocatable) 
X  -  Routine  is  on  Master  System  Tape 
For  example , 

b1+  -  UOI  -  SQR3  -  17  -  RX 

would  stand  for  the  square  root  routine  (SQR3)  v^Titten  at  the  University  of 
Illinois  (UOl).   It  would  be  on  the  system  tape,  is  in  relocatable  binary  form, 
and  is  the  seventeenth  routine  admitted  to  the  library. 
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5-2.   SHARE  Routine  Classification  Scheme 


A.    Arithmetic  Routines 
1.   Real  Numbers 


2.   Complex  Numbers 


3.   Decimal 


May  include  multiple  precision 
fixed  and  floating-point  operations. 
May  include  multiple  precision^ 
fixed  and  floating-point  operations. 
BCD  single  or  multiple  precision 
arithmetic  operations. 


Elementary  Functions 

1.  Trigonometric 

2.  Hyperbolic 

3.  Exponential  and  Logarithmic 
h.      Roots  and  Powers 


Also  pertains  to  inverse 
trigonometric  functions. 


Refers  to  roots  of  quantities^ 
not  polynomials. 


C.  Polynomials  and  Special  Functions 

0.  Minimization  of  Functions 

1.  Evaluation  of  Polynomials 

2.  Roots  of  Polynomials 

3.  Evaluation  of  Special  Functions   "         '     ■ 
h.  Simultaneous  Non-linear  Algebraic  Equations 

5.  Simultaneous  Transcendental  Equations 

D.  Operations  on  Functions  and  Solutions  of  Differential  Equations 

1.  Numerical  Integration 

2.  Numerical  Solutions  of  Ordinary  Differential  Equations 

3.  Numerical  Solutions  of  Partial  Differential  Equations 
k.  Numerical  Differentiation 


Date: 

14/15/6^ 

Section: 

5.2. 

Page: 

1 

Change : 

E.  Interpolation  and  Approximations 

1.  Table  Look-up  and  Interpolation 

2.  Curve  Fitting 

3.  Smoothing 

F.  Operations  on  Matrices,  Vectors  and  Simultaneous  Linear  Equations 

1.  Matrix  Operations 

2.  Eigenvalues  and  Eigenvectors 

3.  Determinants 

k.      Simultaneous  Linear  Equations 


G.   Statistical  Analysis  and  Probability 
1.   Data  Reduction 


2.  Correlation  and  Re- 
gression Analysis 

3.  Sequential  Analysis 

'1 .   Analysis  of  Variance 

5.   Random  Number  Generators 


Refers  to  the  calculation  of  the 
more  common  statistical  parameters 
such  as  mean,  median,  standard 
deviation,  etc 

Includes  curve  fitting  which  is 
explicitly  for  statistical  purposes. 


Operations  Research  and  Linear  Programming 


I .   InDut 


1.   Binary 


2.   Octal 


3-   Decimal 


Pertains  to  program  input  or  data 
input  in  the  binary  mode  (via  card, 
tape,  or  disc). 

Pertains  to  program  input  or  data 
input  in  the  octal  mode  (via  cards). 
Pertains  to  program  input  and  data  input 
in  the  decimal  mode  (via  card  or  tape). 
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k.      BCD  (Hollerith) 


5.   Composite 


Pertains  to  progrgLm  input  or  data 
input  in  the  BCD  or  Hollerith  mode 
(via  card,  tape,  or  disc). 
A  combination  of  any  of  the  above, 
which  is  not  primarily  one  of  the 
above,  such  as  a  general  purpose 
input  program. 


J.   Output 

1.   Binary 


2.   Octal 


3.   Decimal 


k.      BCD  (Hollerith) 


5.  Analog  (Plotting) 

6.  Composite 


Pertaining  to  program  output 
(card  to  tape)  or  data  output 
(card,  tape,  or  disc)  in  the 
binary  mode. 

Pertains  to  program  output 
(printer)  or  data  output  (card 
or  printer)  in  the  octal  mode. 
Pertains  to  program  output  (card, 
tape,  or  printer)  or  data  output 
(card,  tape,  or  printer)  in  the 
decimal  mode. 

Pertains  to  program  output  (card, 
tape,  printer,  or  disc)  or  data 
output  (card,  tape,  printer,  or 
disc)  in  the  BCD  mode. 
CRT 

A  combination  of  any  of  the  above, 
which  is  not  primarily  one  of  the 
above,  such  as  a      -il  purpose 
output  program. 
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K.   Internal  Information  Transfer 


0.   Tape 


Relocation 


Generally  denotes  core-to-core^ 

tape-to-tape,  and  core-to-tape 

movement  s . 

Any  tape  read/write,  editing, 

duplicating,  or  comparing,  etc, 

program. 

Pertains  to  core-to-core  relocation 

only,  not  input  with  relocation. 


L.   Executive  Routines 

1.  Assembly 

2.  Compiling 

3.  Monitoring 

k.  Preprocessing 

5.  Disassembly  and  De-Relativizin^ 

6.  Relativizing 

M.   Data  Handling 

1.  Sorting 

2.  Conversion  and/or  Scaling 


Pertains  to  any  conversion  and 
scaling  routine  (packed  or 
unpacked,  single  or  multiple 
precision)  such  as  card  image 
to  BCD,  BCD  to  card  image, 
binary  to  BCD,  BCD  to  binary, 
fixed  to  floating,  etc.   The 
primary  function  of  programs 
in  this  category  must  be 
conversion  or  scaling,  not 
input -output . 


Merging 
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Q. 


Core,  tape,  disc,  console 
printouts  (on-or  off-line) 


Off-line  equipment 


Other 


K.   Debugging 

1.  Tracing:  Trapping 

2.  Dumping 

3=   Memory  Verification  and  Searching 
k.      Breakpoint  Printing 

0.   Simulation  and/or  Interpretation 

0.  Computers  Pertains  to  programs  which 

simulate  or  interpret  other 

machines  on  the  704,  709^ 

or  7090. 

Any  program  w/iich   simulates 

off-line  equipment. 

Such  as  simulation  of 

theoretical  or  pseudo -computers. 

Pertains  to  any  program  which 
checks  for  malfunctioning  of 
the  computer  or  its  components. 

Service  of  Housekeeping 

Pertains  to  any  routine  of  a 
utilitarian  nature  which 
performs  a  service  for  the 
programmer  such  as  executing 
the  equivalent  of  pushing  a 
button  on  the  console,  setting 
a  dial,  or  accumulating  a 
check  sum. 

1.  Clear/Reset  Programs 

2.  Check  Sum  Accumulation  and  Correction 


P.   Diagnostics 


3.   Restore,  Rewind,  Tape  Mark,  Load  Cards,  Loe 
Programs 


i.d  Tape,  etcn ; 
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All  Others 


This  category  contains  all 
routines  for  which  no  primary- 
class  has  yet  been  designated. 
Routines  which  are  covered  by 
a  primary  class  but  which  are 
not  adequately  described  by  a 
sub-class  are  assigned  the 
applicable  primary  classification 
with  a  sub-class  designation 
of  zero. 
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5.3-   Library  Subroutines 

5..3-1'   Documentation 

The  documentation  of  the  library  subroutines  is  complete  and  formalized. 
Several  categories  of  information  are  included  for  each  subroutine;  they  are 
discussed  below.   Line  references  are  to  the  lines  of  an  example.  (Figure  5-l)" 

IDENTIFICATION  The  identification  of  the  library  subroutine  consists 
of  the  SHARE  Routine  Classification  Number  (line  l)  (see  section  5o2j  and  a 
descriptive  title  (line  S)-   Also  included  is  a  statement  of  the  languages 
(see  section  3.3,)  in  which  the  subroutine  may  be  called  (line  k). 

PURPOSE  A  statement  of  the  purpose  of  the  subroutine  appears  next 
(lines  6,  7)- 

RESTRICTIONS   Since  the  computer  is  a  finite  machine  (in  the  sense  that 
registers  are  of  finite  length,  core  is  of  finite  size,  computation  can  be 
carried  out  only  over  a  finite  period  of  time,  etc.,  restrictions  of  various 
kinds  may  exist.;  in  the  example  (lines  9-ll)j  restrictions  concerning  storage 
of  double-precision  numbers  are  stated.   Abbreviations  appearing  in  this 
section  of  the  example  are  exj ''  '   1  in  a  footnote  (lines  22,  23). 

METHOD  A  statement  --x'  nie  mathematical  method  employed  by  the 

subroutine  appears  in  this  section  (lines  13-20,  2^-33)"   Two  methods  of  noting 
references  are  used:   if  but  one  or  two  references  are  required,  then  they  appear 
as  footnotes  (line  2l)  to  this  section;  if  several  references  are  required,  then 
they  appear  in  a  separate  section,  REFERENCES . 

USAGE  In  the  IDENTIFICATION  section,  the  languages  in  which  the 
subroutine  may  be  called  are  stated.   In  this  section,  specific  instructions 
(lines  35-^^)  for  calling  the  routines  are  given,  with  examples,  for  each  of 
the  permitted  languages.   Occasionally  included  here  is  a  statement  of  the 
numerical  accuracy  of  the  routine,  if  this  is  appropriate. 

CODING  INFORMATION  This  section  contains  statements  of  the  approximate 
time  required  for  execution  (line  h6)   and  the  exact  number  of  storage  locations 
required  for  the  program  (line  ^7)-   If  the  user  requires  the  exact  timing  for 
execution,  then  he  must  calculate  it  from  the  program  listing,  which  is  also 
included  as  a  part  of  the  documentation-   In  those  subroutines  of  an  iterative  natu 
exact  timing  information  may  not  be  practicable  tn  nhtai  n 
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TEST  RESULTS  If  the  nature  of  a  particular  program  is  such  that  test 
results  should  be  documented  (as  for  example  in  the  case  of  a  pseudo-random  number 
generator),  then  that  information  is  included  in  this  section;  otherwise  the  section 
is  omitted. 

Each  library  subroutine  write-up  is  signed  (line  U8 )  by  the  programmer 
and  is  approved  by  the  staff  member  in  charge  of  computing  services.   Every 
write-up  concludes  with  a  listing  of  the  source  language  program. 

Where  subroutines  have  been  acquired  in  part  or  in  whole  from  other 
sources,  appropriate  acknowledgements  are  made  in  a  separate  ACKNOWLEDGEMENTS 
section. 
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UNIVERSITY  OF  ILLINOIS 
GRADUATE  COLLEGE 
DIGITAL  COMPUTER  LABORATORY 

709U  Library  Routine  Bl-UOI-DATN-^l-SR  1 

IDENTIFICATION                                             "  "   ^  ■-'  2 

Floating  Point  Double  Precision  Arctangent                "  3 

FORTRAN,  SCATRE,  and  MAD                            ''  '       "   -'  k 

PURPOSE                                                               '  5 

This  program  computes  the  double  precision  principal  value  of  arctan  x  6 

for  a  double  precision  floating  point  number  x.  7 


RESTRICTIONS 


The  double  precision  arguments  and  results  must  be  stored  such  that  9 
the  M.S. P.  is  in  an  even  core  location,  2n,  and  the  L.S.P.  in  the  odd  10 
core  location  2n+l .   The  argument  need  not  be  normalized.  11 


METHOD  .12 

The  range  of  the  argument  is  first  reduced  to0<|x|<0.2by  13 

means  of  the  identity  tan   x-tan  y  =  tan   t — —,    and  then  arctan  x  1^+ 

is  computed  using  a  truncated  continued  fraction  formula  due  to  15 

Gauss.   (See  |l|)  16 

m^t^  I 

arctan  x  =  '-r-^  +  L      -rrr — J-  .  ■.   '  17 

'  ^        2m+l  -  .  - 


'    m=l 


The  truncated  continued  fraction  is  then  expressed  as  a  quotient  ■         18 

of  two  polynomials :  19 

r    6       k  2-7 

X  C^X   +  C^X   +  CoX   +  c^    ■ 

arctan  x  =  tt 7 ■. ^ 20 

8      6      4      2 
ex  +  ex  +  ex  +  c,x  +  c 


[i]  C.  F.  Gauss,  "Werke"  vol.  3,  I876   .    ..  ,  _.                         21 

*   M.S. P.:   More  significant  part.         ~    _  .  .                         22 

L.S.P.:   Less  significant  part.  23 

Figure  5-1 


where   c  =  11,025 
Cg  =  396,900 
c^  =  2,182,950 
c^^  =  3,783,780 
c^  =  2,027,025 
eg  =  136,i+31 
c^  =  1,327,095 
cq  =  3,108,105 


27 


For  small  values  of  the  argument,  |x|  <  2   ,  the  approximation 

-1  '^   • 
tan  X  =  X  IS  used. 


2U 

25 
26 

27 
28 

29 
30 
31 

32 
33 


USAGE 


Calling  sequence:   Let  A  and  B  be  even  core  locations. 

a)  SCATRE:    CALL  DATN,A,B 

b)  FORTRAN:    CALL  DATN(A,b) 

c)  MAD:       EXECUTE  DATW.(A,b) 
where 

A,  A  +  1  contain  the  double  precision  argument  x 

B,  B  +  1  contain  the  double  precision  result  arctan  x 

The  result  will  be  in  normalized  form  ixnless  entry  is  made  with  an 

-27 
unnormalized  argument  less  than  2   •   In  this  case  the  result 

returned  is  the  argument. 


3^ 
35 
36 
37 
38 

39 
1+0 

^1 
k2 
^3 


CODING  IMFORMATION  '■. 

Time:  Approximately  202  cycles. 
Space  Required:   2UI0  storage  locations  for  program  storage 


U5 
^7 


Programmed  and  checked  by 


Ocf/ber  22,  I963 


f 


Approved  by  (p^'^-^Cvi^  'h^'^' 


u' 


1+8 


Figure  5»1  Continued 
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Figure  5*1  Continued 
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FORTRAJI  and  MAJ)  Double  Precision  Opera-icns 

This  program  enables  FORISAJf  and  KAD  prograiriners  to  do  snuitipls 
precision  add,  subtract,  maltipl^",  and  divide  operations  = 


Date : 

V^5/6- 

Section; 
rage: 

5.3-2' 
1 

Change 

B1-U0I-ATN2-1^-S  11/2/62 

Fixed  Point  Arctangent 
7090  SCATRE  Program  (minimum  7090) 

To  find  the  principal  value  of  arctan  x  for  a  fixed  point  fraction 
X.   The  binary  point  is  assumed  to  be  located  immediately  to  the  left  of 
bit  1. 

Bl-UOI-DATN-^l-SR  IO/22/63 

Floating  Point  Double  Precision  Arctangent 
FORTRAJ\[,  SCATRE,  and  MAD 

This  program  computes  the  double  precision  principal  value  of  arctan 
X  for  a  double  precision  floating  point  number  x. 

B1-U0I-SIN1-9-S  10/11/62 

Floating  Point  Sine  Cosine 
7090  SCATRE  Prograjn  (minimiim  7090) 

To  compute  the  floating  point  sine  or  cosine  of  a  floating  point 
angle  0,  using  fixed  point  arithmetic. 

B1-U0I-SIN2-10-S  8/6/62 

Fixed  Point  Sine  and  Cosine 
7090  SCATRE  Program  (minimum  7090) 

To  compute  the  sine  of  an  angle,  9,  using  fixed  point  arithmetic. 

Bl-UOI-SIN3-^7-SR  10/1/63 

Double  Precision  Floating  Point  Sine  and  Cosine 
SCATRE,  SCAT,  FORTRAN,  and  MAD 

This  program  computes  the  double  precision  floating  point  sine  or 
cosine  of  a  double  precision  floating  point  argument  in  radians. 
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B3-UOI-DEX1-41-SR  8/1/63 

Double  Precision  Floating  Point  Exponential 
SCATRE,  FORTRAN,  MAD 

This  program  computes  in  double  precision  a  floating  point 

XX  X 

2  ,  e  ,  or  10  where  x  is  a  double  precision  floating  point  number. 

B3-U0I-DLN1-U2-SR  8/1/63 

Double  Precision  Natural  Logarithm  -      -    ■ 
SCATRE,  FORTRAN,  MAD 

This  program  computes  the  double  precision  natural  logarithm  of 
a  positive  normalized  double  precision  floating  point  number. 

e3-uoi-expU-^-s  10/1/62 

Fixed  Point  Exponential,  Base  e 

7090  SCATRE  Program  (minimujn  TO9O) 

X  -  ^S 

To  compute  e   for:   -1  +  2  "^^  <  x  <  -0, 

B3-U0I-EXP^-U-S  11/2/62 

Floating  Point  Exponential 
7090  SCATRE  Program  (minimum  709O) 

To  compute  e   in  single  precision  floating  point  arithmetic. 

B3-UOI-EXP6-6-S  11/2/62 

Fixed  Point  Exponential,  Base  2 
7090  SCATRE  Program  (minimum  7090) 

Given  the  fixed  point  fraction  x,  -(l~2    )  "S.  ^  S.  '^^'    ^° 
compute  2  as  a  fixed  point  fraction. 

B3-U0I-EXP7-7-S   "  11/2/62 

Fixed  Point  Exponential,  Base  e 
7090  SCATRE  Program  (minimum  7O90) 

Given  the  fixed  point  fraction  x,  -(l~2    )<x<  ~0;>  to 

X 

compute  e  as  a  fixed  point  fraction. 
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B3-UOI-LOG1-8-S  10/11/62 

Floating  Point  Natural  Logarithm 
7090  SCATRE  Program  (minimiim  7090) 

To  compute  the  natural  logarithm  of  (l+x),  given  a  floating 
point  argument  x. 

B3-UOI-LOG3-12-S  10/22/62 

Fixed  Point  Logarithm,  Base  e 
7090  SCATRE  Program  (minimum  7090) 

To  compute  the  natural  logarithm,  in  fixed  point  arithmetic,  of 
1  +  y,  where 

-  1/2  <  y  <  1  -  2"-^^. 

B3-U0I-L0G^-13-S  10/22/62 

Fixed  Point  Logarithm,  Base  2 
7090  SCATRE  Program  (minimum  7O9O) 

Given  a  fixed  point  fraction  x,  2  "^  <  x  <  1  -  2  ■^•^,  find 
fixed  point  logpX. 
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BU-U0I-CUR2-11-S  1lQ/1'^/G2 

Floating  Point  Cube  Root 
7090  SCATRE  Program  (minimum  7090) 

To  compute  the  cube  root  of  a  normalized  floating  point  quantity. 

B4-UOI-CUR3-38-SR  6/17/63 

Floating  Point  Cube  Root  -  . 

FORTRAN,  SCATRE,  MAD 

To  compute  the  cube  root  of  any  normalized  floating  point  number. 

bU-uoi-cur^-Uo-sr  7/15/63 

Double  Precision  Floating  Point  Cube  Root 
SCATRE,  FORTRAN,  MAD 

To  compute  the  real  cube  root  of  any  normalized  double  precision 
floating  point  number. 

BU-UOI-DCSR-J49-SR  10/21/63 

Floating  Point  Double  Precision  Complex  Square  Root 
FORTRAN,  SCATRE,  and  MAD 

To  compute  the  square  root  of  a  complex  number  whose  real  and 
imaginary  parts  are  in  double  precision  floating  point  normalized  form. 

eU-uoi-dsqrt-39-sr  7/9/63 

Double  Precision  Floating  Point  Square  Root 
SCATRE,  FORTRAN,  MAD 

To  compute  the  positive  square  root  of  a  norm.alized  non-negative 
double  precision  floating  point  number. 

BU-UOI-SQRI-22-S  11/15/62 

Fixed  Point  Square  Root 
7090  SCATRE  Program  (minimum  7090) 

To  extract  the  square  root  of  a  non-negative  fixed  point  fraction  F. 
The  binary  point  is  assumed  to  be  located  immediately  to  the  left  of 
bit  1  of  the  Accumulator. 
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BU-U0I-SQJ^2-3-S  V5/63 

Floating  Point  Square  Root 
7090  SCATRE  Program  (minimum  709O) 

To  take  the  square  root  of  a  normal  non-negative  floating 
point  number. 

b4-U0I-SQR3-2^-S  11/28/62 

Fixed  Point  Square  Root 
7090  SCATRE  Program  (minimum  7090) 

To  extract  the  square  root  of  a  non-negative  fixed  point 

-70 
fraction  x,  -0  <  x  <  1  -  2 
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V15/6U 
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6 


C2-UOI-DPPR-53-SR  10/2V63 

A  General  Pi'ogram  for  finding  Double  Precision  Floating  Point 
Polynomial  Roots  '   '■ 

This  is  a  complete  or  "canned"  program.   The  user  need  do 
no  programming. 

An  input-output  structure  is  built  around  subroutine  DPRT 
(with  slight  modifications)  to  compute  the  roots  of  a  polynomial 
equation  with  complex  coefficients: 

N      N-1      N-2 
a-|_x  +  a^x    +  ax    +  ,  .  .  +  a^^x  +  a^_^^  =  0 

where 

Pi^,    B  are  double  precision  real  numbers. 

C2-U0I-DPRT-^2-SR  IO/2I+/63 

Double  Precision  Floating  Point  Polynomial  Root  Finder 
FORTRAN,  SCATRE,  or  MAD 

This  subroutine  coded  in  SCATRE  uses  709^  double-precision 
operations  to  compute  the  roots  of  a  polynomial  equation  with 
complex  coefficients: 


N      N-1 

+  .  .  .  +  a  V  +  f^ 

N+1 


ax  +  ax    +  . .  .  +  a  jc  +  a,_  ,  =  0 


where 


\  =  \ 


+   iB, 


A,  ,  B,  are  double  precision  real  numbers. 
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C3-U0I-CEI1-21-S  ll/lU/62 

Complete  Elliptic  Integrals,  Fixed  Point 
7090  SCATRE  Program  (minimiMi  7090) 


To  compute  2""^  K(k)  =  2"^    /  n/2 


d^ and 


■Jl-k^   sin^  (}) 


2"^  E(k)  =  2~^ 


n/2 


N/l-k^  sin^(j 


C3-UOI-FACI-I6-S  10/31/62 

Floating  Point  Factorial 
7090  SCATRE  Program  (minimum  7O9O) 

To  provide  the  floating  point  value  of  I.',  where  I  is  a 
fixed  point  integer,  (i.e.,  I  x  2    )  and  0  <  I  <  33. 

C3-U0I-FAC2-27-SR  2/25/63 

Floating  Point  Factorial  (FORTRAN,  MAD,  SCAT) 
7090  FORTRAN,  MAD,  or  SCATRE  Program  (minimum  7090) 


To  provide  the  floating  point  value  of  I.',  where  I  is  a 
i  point  FORTRAN  or  MAD  i 
respectively  and  0  <  I  <  33- 


-17         -35 
fixed  point  FORTRAN  or  MAD  integer,  i.e.,  I  x  2   '  or  I  x  2  -^ 


I 
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Dl-UOI-SIMl-30-FR  V3/63 

Integration  by  Simpson's  3  Point  Rule 
F0RmAI^  or  SCATRE  (minimum  7O9O) 

This  routine  uses  Simpson's  3  point  rule  to  approximate  the 

definite  integral  Gr  =  V   F(x)dx.   The  error  in  the  approximation  is 

determined  by  the  relative  difference  that  the  user  supplies  in  the 
calling  sequence. 
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D2-UOI-ADM3-36-SR  5/30/^3 

^th  Order  Adams -Moult on  Integrator 

To  integrate  a  set  of  N  first  order  total  differential 
equations,  using  an  Adams -Moult on  Uth  order  difference  method. 

D2-UOI-DRKl-^5-SR  8/20/63 

Double  Precision  Floating  Point  Runge  Kutta 
SCATRE  Only 

This  program  integrates  a  set  of  N  simultaneous,  first  order, 
differential  equations  in  double-precision  floating  point  arithmetic. 

D2-U0I-RKyi-17-S  10/30/62 

Fixed  Point  Runge-Kutta 
7090  SCATRE  Program  (minimum  7090) 

To  solve  a  set  of  N  simultaneous,  first  order,  ordinary- 
differential  equations  in  fixed  point  arithmetic. 

D2-U0I-RKY3-20-S  Yl/lk/62 

Floating  Point  Runge-Kutta 
7090  SCATRE  Program   (minimiom  7090) 

To  solve  a  set  of  N  simultaneous,  first  order,  ordinary- 
differential  equations  in  floating  point  arithmetic. 

D2-U0I-RKYU-46-S  8/28/63 

Floating  Point  Runge-Kutta 
709U  SCATRE  Program 

To  solve  a  set  of  W  simultaneous,  first  order,  ordinary 
differential  equations  in  floating  point  arithmetic.   This  routine 
should  be  used  rather  than  RKY3  on  a  709^  since  this  routine  utilizes 
the  709^  double  precision  orders  and  therefore  is  much  faster  than 
RKY3. 
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F1-U0I-MAM1-26-S  2/19/63 

Floating  Point  Matrix  Multiplication 
FORTEAU  or  SCATRE  (minimum  7090) 

This  assembly  language  coded  subroutine  uses  double-precision 
summation  to  compute  the  product  of  two  real  matrices.   The  factors 
and  the  product,  however,  are  stored  in  the  usual  single -precision 
forms  as  two-dimensional  floating  point  FORTRAJM  arrays.   The  purpose 
is  to  suppress  the  accumulation  of  round-off  error  which  is  otherwise 
incurred  in  summing  rounded  products  to  form  a  cell  of  the  product 
matrix. 

The  routine  has  four  entry-points,  and  by  suitable  choice  of 
one  of  these  the  user  may  obtain  with  equal  ease  any  one  of  the  four 

products 

T     T   T  T 
AB,  A  B,  AB  ,  A  B  , 

where  the  superscript  T  denotes  transposition. 

F1-U0I-MAM2-37-SR  6/II/63 

Double  Ei-ecision  Floating  Point  Matrix  Multiplication 
FORTRAN  or  SCATRE  (709*+) 

This  assembly  language  coded  subroutine  uses  709^  double -precis ion 
operations  to  compute  the  product  of  two  real  matrices.   The  factor 
matrices  and  the  product  matrix  are  stored  in  double-precision  forms 
as  two-dimensional  floating-point  FORTRAN  arrays.   The  use  of  709^ 
double  precision  orders  maizes  this  routine  much  faster  than  one  which 
uses  single  precision  orders  to  do  double-precision  aritlimetic 

The  routine  has  four  entry-points,  and  by  suitable  choice  of 
one  of  these  the  user  may  obtain  with  equal  ease  any  one  of  the 

four  products 

T     T   T  T 
AB,  A  B,  AB  ,  A  B  , 

where  the  superscript  T  denotes  transposition. 
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F2-U0I-EIG1-29-FR  3/2.0/6-^   . 

Floating  Point  Eigenvalues  and  Eigenvectors  of  a  Symmetric  Matrix 
FORTRAN  and  SCATRE  only  (minimmn  7090) 

EIGl,  using  non-iterative  methods  of  Householder,  Ortega,  and 
Wilkinson,  solves  for  the  eigenvalues  and  corresponding  eigenvectors 
of  a  real  symmetric  matrix.   This  program  was  written  in  FORTRAN. 
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fU-uoi-invi-3^-fr  5/8/63 

Matrix  Inversion  with  Accompanying  Solution  of  Linear  Equations 
FORTRAN  II 

FORTRAN  II  subroutine  solves  the  matrix  equation  AX  =  B, 
where  A  is  a  square  coefficient  matrix  and  B  is  a  matrix  of 
constant  vectors.   A   is  also  obtained;  indeed,  inversion  ma\  ;    he 
sole  aim  in  a  particular  usage.   The  determinant  of  A  is  also  available. 

Fi|-U0I-LSQl-31-FR  5/3/63 

Least  Square  Polynomial  Fit 
FORTRAN  II  (minimum  7090) 

FORTRAN  II  subroutine.   Given  a  set  of  N  values  of  an  independent 
variable  X,  with  associated  weights  W,  and  one  or  more  sets  of 
corresponding  values  of  Y,  the  routine  determines  the  coefficients  of 
the  polynomial(s)  of  degree  M-1  which  gives  the  best  fit  in  the  least 
squares  sense  to  the  set(s)  of  Y.   In  addition,  the  residuals,  the 
weighted  sum(s)  of  squares  of  residuals,  and  the  error  matrix  are  coi:i|V!l 

FU-U0I-LSQ2-32-FR  5/3/63 

A  General  Program  for  Least  Square  Polynomial  Fit 
FORTRAN  II  (minimum  7090) 

This  is  a  complete  or  "canned"  program.   The  user  need  do  no 
programming. 

An  input-output  structure  with  various  options  is  built  around 
subroutine  LSQl  for  the  determination  of  the  coefficients  of  the 
polynomial  of  specified  degree  which  best  fits,  in  the  least  squares 
sense,  the  supplied  data. 
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G2-IJ0I -SMIRK- 58 -FR 


V3/6i+ 


Smirnov-Kolmogorov  D  Statistic  (Goodness  of  Fit) 
709^+  FORTRM  Program 

This  program  computes  and  prints  the  Smirnov-Kolmogorov  D 
Statistic  for  goodness  of  fit  to  a  normal  distribution. 
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G3-UOI-RAN1-35-SR  "^lY^jG-i 

Generate  Floating  or  Fixed  Point  Numbers  Pseudo -Uniformly 
Distributed  on   jO,!). 
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HO-UOI-CPPl-^O-FR  lO/l'^/6-i 

Complete  program  -  FORTRAN  or  Relocatable  Binary. 

This  is  a  complete  computer  program  (the  user  need  do  no 
programming)  to  carry  out  the  calculations  for  Critical  Path 
Programming,  as  described  by  James  E.  Kelley^,  Jr. ,  of  Mauchley 
Associates,  in  "Critical  Path  Planning  and  Scheduling:  Mathematical 
Basis",  Operations  Research,  Vol.  9,  Wo.  3,  I961,  pp.  296-32O. 

A  great  deal  of  flexibility  has  been  built  into  the  program. 
Various  types  of  computer  runs  can  be  made,  and  alternative  forms  of 
output  are  obtainable.  ^__. 
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5.3.2. 


J3-UOI-FLOT-33-KX:  5/2/63 

Plot  Graphs  on  the  Off -Line  Printer 

Rapid  machine  plotting  of  numeric  information  for  use  with 
FORTRAN,  SCATRE  or  MAD  calling  programs.   The  resulting  graph  is 
copied  onto  any  decimal  output  tape  for  subsequent  off-line 
printing  or  punching. 

J5-UOI-SCP1-23-SR  3/6/63  .  ; 

General  Axes  and  Point  Plotter 
(7090  with  7^0  Output  Recorder  and  7  index  registers) 

To  plot  axes  and  points  on  the  7^0  Output  Recorder  from  floating 
point  or  fixed  point  information  in  core. 

J5-U01-SCP2-28-SR  3/6/63 

FORTRAN  Axes  and  Point  Plotter 
(7090  with  7^0  Output  Recorder  and  7  index  registers) 

To  plot  axes  and  points  on  the  7^0  Output  Recorder  from  floating 
point  or  fixed  point  information  in  core. 

JS-UOI-SCP3-15-S  3/6/63 

General  Alphanimieric  Cathode  Ray  Display 

To  display  alphanumeric  messages  on  the  7^0  Output  Recorder. 
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M2-U0I-CJW1-18-S  11/5/^2 

Fixed  Point  Binary  Fraction  to  BCD  Conversion 
7090  SCATHE  Program  (minimum  709O  +  7  index  registers) 

To  convert  a  fixed  point  binary  fraction  f  to  BCD  characters, 

where 

-35  -35 

-1  +  2    <  f  <  1  -  2  ^^. 

M2-U0I-CNV2-U8-SR  9/24/^3 

Convert  BCD  Characters  to  a  Double  Precision  Floating  Point  Number 
SCATRE,  FORTRAN,  and  MAD 

M2-U0I-DCI\rV-4U-SR  8/19/63 

Convert  a  Double  Precision  Floating  Point  Number  to  BCD  Characters 
SCATRE,  FORTRAN,  MAD 

M2-UOI-BCDCB-55-SR  ^/3/&^ 

One  Word  BCD  to  Column  Binary  Conversion  Routine 
SCATRE,  MAD  and  FORTRAN  (minimum  7O90) 

To  permit  Hollerith  information  to  appear  in  a  binary 
card. 
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N2-UQI-DYM)-5^-SR  II/I9/63 

Dynamic  Diagnostic  Routine 
FORTRAN  or  SCATRE 

This  routine  allows  the  user  to  obtain  a  dump  of  machine 
registers  and  contents  of  a  block  of  core  storage,  with  control 
being  returned  to  the  user  after  the  dump. 
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-U0I-S6^0-2^-BX  Vll/^3 

IBM  650  Simulator  on  7090-lii01  System  (SIM650) 

To  allow  the  running  of  IBM  65O  programs  on  the  709O  without 
translation  into  709O  code.   The  IBM  65O  is  simulated  exactly. 
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5-^.   The  Tape  Library  Subroutines 

5.U.I.   General 

An  entirely  separate  set  of  subroutines  from  that  discussed  in  section 
5. 3i. above,  and  in  some  instances  overlapping  it,  is  also  available  on  the  library 
tape.   These  routines  were  obtained  as  a  package  from  the  University  of  Michigan 
and  are  known  as  the  Tape  Library  Subroutines.   It  is  the  intention  of  the 
Digital  Computer  Laboratory  to  eventually  incorporate  write-ups  of  these 
subroutines  into  the  Subroutine  Library  described  in  the  previous  section. 

All  the  subroutines  in  the  Tape  Library  Subroutine  package  are  on 
the  system  library  tape  and  are  available  to  users  simply  by  calling  them  in  a 
program.   No  binary  card  decks  are  necessary,  but  symbolic  decks  may  be  obtained 
in  Room  165  and  the  user  may  assemble  them  himself.   Complete  \«-ite-ups  on  all 
the  subroutines  are  available  at  Room  I65  ERL.   The  user  should  ask  the 
librarian  for  the  Subroutine  Library  wi'ite-up.   For  the  user's  convenience  in 
determining  whether  or  not  the  subroutines  are  of  interest,  the  following 
section  of  abstracts  of  all  the  subroutines  in  the  package  is  included. 
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5.^.2.   Tape  Library  Subroutine  Abstracts 


ANA 

jzSra 


ATAN 


ATNl 


BCDBW 
MBCDBN 

BKBCD 


BSLl 


Logical  Operations 

To  provide  the  logical  operations  AND  and  OR  for  use  in  MAD  programs. 

Floating  Point  Principal  Valued  Arctangent 

To  compute  the  principal  value  of  arctan  (x)  for  the  floating  point 

argument  x. 

Floating  Point  Single  Valued  Arctangent 

To  compute,  in  the  range  of  0  to  2n ,    the  single  value  of  arctan  (y/x) 

for  floating  point  arguments  x  and  y. 

One  Word  BCD  to  Binary  Conversion 

To  convert  one  BCD  word  into  the  equivalent  binary  integer. 

One  Word  Binary  to  BCD  Conversion 

To  convert  a  binary  integer  into  its  BCD  equivalent,  which  is  right 
justified  and  filled  in  with  leading  zeroes.   The  primary  use  of  this 
subroutine  is  in  modifying  formats  with  integers  read  in  as  data. 

Bessel  Functions 

To  compute  Bessel  functions  J(n,x),  l(n,x),  Y(n,x),  K(n,x), 

exp  (-x)  l(n,x),  and  exp(x)  K(n,x),  for  real  values  of  x  >  0  and  for 

integral  values  of  n,  0  <  n  <  5^  where  n  is  the  order  of  the  desired 

Bessel  function. 


CMEQ,      Solution  of  Complex  Equations 

To  solve  the  system  of  complex  linear  equations  (A  +  iB)  Z  =  C  +  iD 
for  the  unknown  vector  Z.   A  scaled  determinant  |A  +  iE  is  also 
evaluated.   A,  B,  C,  and  D  are  separate  matrices.   A  is  an  n  x  n 
matrix  of  real  coefficients,  B  is  an  n  x  n  matrix  of  imaginaries,  C 
is  a  vector  of  reals  and  D  is  a  vector  of  imaginaries.   Both  C  and  D 
are  of  dimension  n. 
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CMSQRT    Complex  Square  Root 

To  compute  the  square  root  of  a  complex  number. 


COMPZ 
ZC0MPZ 


Symbol  Manipulation 

COMPZ  packs  a  sequence  of  left  justified  BCD  characters  into 
full  word  (6  characters  per  word)  BCD  form.   If  the  last  word  is 
incomplete,  it  is  left-justified  with  trailing  blanks. 

ZCOMPZ  is  the  same  as  COMPZ,  except  that  the  last  word,  if 
incomplete,  is  right-justified  with  leading  zeroes. 


DETMNT    Determinant  Calculation 

To  compute  the  scaled  determinant  of  a  real,  square  matrix  of 
arbitrary  order  n. 


DPFA 
DPFM 
DPFDV 


EIGN 


Double  Precision  Floating  Point  Arithmetic 

To  perform  double  precision  arithmetic  operations  on  double 
precision  numbers  which  are  in  floating  point  form. 

Eigenvalues  and  Eigenvectors 

To  compute  all  eigenvalues  and/or  eigenvectors  of  a  real 
symmetric  matrix  by  the  Jacobi  method.   The  elements  of  the  matrix 
must  satisfy  the  condition: 


n 


3  =  Z   (a.  ./a  )  N<  2 
m   .  .  T  xr    m   ^ 


257 


where 


mm 


m 


ij 


/  0. 


EL0G      Floating  Point  Logarithm 

To  compute  ln(x)  for  floating  point  argument  x  >  0. 

EXP       Exponentiation  -  The  Base  e 
To  raise  e  to  the  floating  point  exponent  x. 
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EXPl      Exponentiation  -  Integer  Base  and  Integer  Exponent 
To  raise  an  integer  base  to  an  integer  power. 

EXP2      Exponentiation  -  Floating  Point  Base  and  Integer  Exponent 
To  raise  a  floating  point  number  to  an  integer  power. 

EXP3      Exponentiation  -  Floating  Point  Base  and  Floating  Point  Exponent 
To  raise  a  floating  point  number  to  a  floating  point  power. 


HASl 
HASIS 


lEFl 


IjZJSET 
I0PAE 
I0END 


LSH 
RSH 


Harmonic  Analysis  •■• 

Given  a  set  of  points  y.  (i  =  1,  2,    ...,  k-l)  corresponding  to 
a  set  of  equally  spaced  arguments  x.^  this  subroutine  computes  the 
coefficients  a.^  b.,  c,  and  d.  of  the  following  series: 

f(x)  =   a     +  Z  a     cos  nx  +  b      sin  nx 
on  n 

f(x)=a     +Zc      sin(nx+d) 
o  n  n 

The  function  f(x)  is  assumed  to  be  periodic  of  period  2n  with  y  =  y  . 

Incomplete  Elliptic  Integrals 

Given  the  amplitude  A  and  the  modulus  B^  to  evaluate  the  incomplete 
elliptic  integrals  of  the  first  and  second  kind. 

Auxiliary  Input/Output  Procedure  for  MAD 


To  provide  a  means  of  generating  any  series  of  MAD  statements 
within  an  input/output  list^  making  possible  complete  generality 
for  input/output. 

Shifting  Operations 

To  provide  shifting  of  single  words  by  an  arbitrary  number  of  binary 
digits- 
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EDRNl     Normally  Distributed  Random  Number  Generator 

To  produce  a  random  number  such  that  a  set  of  such  niimbers  will 
have  a  specified  mean  and  standard  deviation. 

PCPCH     Program  Common  Punch 

Produces  absolute  column  binary  cards  with  loading  address^ 
check  sum,  and  identification. 

EL0T      Off -Line  Printer  Plotting 

To  provide  rapid  machine  plotting,  on  the  off-line  printer,  of 
numeric  information;  for  use  with  MAD,  SCATRE,  or  FORTRAN  calling 
programs. 

RAM2      Uniformly  Distributed  Random  Number  Generator 

To  produce  a  random  number  in  the  interval  (0,l).   A  set  of 
random  numbers  generated  by  RAM2  has  a  uniform  distribution. 


RKDEQ,     Runge-Kutta  Solution  of  Differential  Equations 

Solves  a  system  of  n  first  order  ordinary  differential  equations 
by  the  Runge-Kutta  fourth-order  method.  The  equations  are  assumed  to 
be  of  the  form 


S  =  ^1  (-•  ^1' 


'^„) 


SELPGM 
SEQPGM 


djc 


^n  ^^^  ^1'    ■•■'    ^n^ 


where  x  is  the  independent  variable. 


Calling  Subroutines  for  Ping-Pong  Segments 


SEQPGM  is  used  in  Ping-Pong  to  call  the  next  core  in  sequence. 

SELPGM  is  used  to  select  one  of  the  cores  as  the  next  core  to  be  executed. 


SETPLT 
USTPLT 


cjzSs 


Plot  Setup  Subroutines 

This  subroutine  Is  designed  to  be  used  with  the  PL0T  subroutine. 
The  PL0T  subroutine  produces  graphs  of  the  quantities  given  it  by  the 
user.   It  is  a  powerful  and  versatile  tool,  but  is,  as  a  result,  rather 
complicated  and  clumsy  to  use.   It  requires  that  the  user  make  four 
entries  to  the  subroutine  with  a  total  of  l6  arguments,  and  in  order 
to  determine  the  values  for  these  arguments  the  user  must  do  considerable 
precalculation.   The  user  must  also  know  the  range  of  answers  in 
advance  so  he  can  set  the  maximum  and  minimum  values  for  the  abscissa 
and  for  the  ordinate.   This  is  all  work  that  can  be  done  by  the  computer, 
and  SETPLT  and  USTPLT  do  it. 

Floating  Point  Sine  and  Cosine 

To  compute  cos(x)  and  sin(x)  for  a  floating  point  argument  x. 


SLINEQ    Simultaneous  Linear  Equations 

Computes  m  solution  vectors  of  a  set  of  n  simultaneous  real 
linear  equations  in  n  unknowns.   That  is,  SLINEQ,  solves  the  matrix 
equation  EX  =  F,  where  E  is  n  x  n  and  F  is  n  x  m,  for  the  m  solution 
vectors  X.   Also,  SLINEQ,  computes  optionally  the  determinant  and  the 
inverse  of  E. 


SPREAD 
GATHER 
FSPRED 
FGATHR 


General  Conversion  Routine 


This  routine  gives  the  user  access  within  core  to  the  l/O 
conversion  routines  (.I0H)  normally  used  in  transmitting  data  to  and 
from  the  computer.   SPREAD  and  FSPRED  are  used  to  move  a  region  into 
a  list  according  to  a  format.   GATHER  and  FGATHR  are  used  to  collect 
a  list  into  a  region  according  to  a  format. 


SORT      Square  Root 

To  compute  the  square  root  of  the  floating  point  number  x  >  0. 
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TAB       Single  Table  Interpolation 

Given  the  order  of  an  independent  argument  x,  perform  a  kth 
order  interpolation  on  a  table  of  (x.,  y. )  values  for  the 
corresponding  dependent  argument  y. 

TAICi      Hyperbolic  Tangent 

To  compute  the  hyperbolic  tangent  of  a  floating  point  number. 

TRANS     Square  Matrix  Tranposition 

To  transpose  a  square  matrix. 

TRAMSl    Arbitrary  Matrix  Transposition 

To  transpose  a  matrix  of  arbitrary  dimensions,  i.e., 
m  X  n  where  m  and  n  are  not  necessarily  equal. 

UITRl     Single  Iteration 

Given  x  =  f(x),  to  find  a  value  of  x  within  a  given  epsilon 
of  error.   If  f(x)  contains  one  iteration,  this  subroutine  is  not 
recommended. 

UITR2     Single  Iteration  ~  Interval  Halving 

Given  f(x)  =  0,  to  find  a  value  for  x,  within  a  given  error, 
in  a  specified  interval  (a,b). 

UITR3     Simultaneous  Iteration 

Given  a  set  of  simultaneous  equations  of  the  form 

x^=  ^1  (-V  ^2^  "•'    \^ 

\=   ^n  ^V  ""2'    '••'    \^' 
to  find  the  values  of  x.  within  a  given  margin  of  error. 

UMVERT    Matrix  Inversion 

Inverts  a  real  square  matrix  of  order  n  and  optionally  computes 
the  determinant. 


Date: 
Section 
Page: 
Change : 


k/l^/6k 

5.^.2. 

6 


ZER2      Zeroes  of  a  Complex  Polynomial 

To  find  the  zeroes  of  a  polynomial  with  complex  coefficients 
which  is  of  arbitrary  degree,  evaluating  both  real  and  complex 
zeroes.   Roots  of  multiplicity  greater  than  two  are  generally 
obtainable. 

ZERp  Store  Constant 

SEMY 

ZERO  stores  zero  in  an  area  of  core,  and  SPRAY  stores  a  given 

constant  in  an  area  of  core. 
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5.5.  The  SHARE  Library  and  Its  Use 

5.5-l»  General 

In  April,  1955,  the  group  of  users  of  IBM  series  700  (later 
7000)  machines  banded  together  in  a  group  called  SHARE,  whose  purpose 
was  to  provide  an  organ  for  the  dissemination  of  library  routines  and  other 
codes  among  users.   This  organization  set  up  procedures  and  standards  for 
reproducing  and  distributing  card  decks,  listings,  descriptions,  etc.,  about 
these  codes.   This  material  is  all  classified  in  convenient  form  for  consulta- 
tion and  use.   Each  routine  is  classified  according  to  a  coded  scheme  which 
indicates  the  nature  of  the  routine  (see  section  5-2^  and  each  program  is 
abstracted.   Copies  of  these  abstracts  in  classification  scheme  order  are 
available  for  inspection  in  Room  168  ERL,  and  the  Digital  Computer  Laboratory 
Library.   The  main  body  of  descriptive  material  is  filed  in  distribution  (i.e., 
temporal)  order  and  is  kept  in  Room  168  ERL,  where  it  is  available  for 
inspection. 
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5- 5-2.  Procedure  for  Using  SHARE  Materials 

The  Digital  Computer  Laboratory  acts  as  the  central  agent  for 
acquisition  and  distribution  of  all  SHARE  material.   The  procedure  for  using 
this  material  is  as  follows: 

a)  The  user  should  first  peruse  the  abstracts  which^  being  filed 
in  library  classification  order,  give  an  immediate  indication 

of  that  group  of  codes  or  routines  pertinent  to  the  user's  interest. 

b)  Each  code  in  the  abstract  is  cross  indexed  with  the  distribution 
number  in  the  main  30,000  page  SHARE  Library.   The  detailed  writeups 
for  those  codes  of  interest  can  then  be  examined  in  this  library. 

c)  If  any  of  the  actual  card  decks  or  routines  are  to  be  used,  the 
next  step  will  depend  upon  whether  or  not  that  deck  has  been 
previously  ordered  by  the  Laboratory. 

d)  Whether  or  not  the  material  already  resides  within  the  Laboratory 
can  be  determined  by  checking  the  abstract  book,  which  will  have 
an  H  printed  opposite  the  descriptive  abstract  if  the  material 
resides  within  the  Laboratory  or  by  checking  the  Cardex  File 
kept  in  Room  l68,  which  will  be  filed  in  library  classification 
order  and  which  will  contain  a  card  for  each  routine  which  has 
already  been  obtained.   If  the  routine  already  exists  within  the 
Laboratory,  a  copy  of  the  card  deck  can  be  obtained  from  the 
Librarian,  Room  165,  and  a  copy  of  the  printed  material  pertaining 
to  this  routine  can  be  inspected  in  Room  168  ERL.   If  the  routine 
happens  to  exist  in  tape,  then  the  user  may  supply  a  tape  to  the 
709^  Operations  Supervisor,  Room  111b  ERL,  and  the  routine  will 

be  copied  onto  this  tape. 
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e)   If  the  routine  has  not  been  previously  ordered  by  the 
Laboratory,  the  user  should  fill  in  the  form  provided, 
SHARE  Library  Materials  Request,  and  return  it  to 
the  secretary  in  Room  l68  ERL.   The  routine  will  be 
ordered  from  the  SHARE  Distribution  Agency  and  the 
prospective  user  will  be  notified  of  its  arrival. 
At  this  time,  the  procedure  described  above  in 
Point  d)  can  be  followed. 
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5. 5- 3-   Concerning  the  Length  of  Time  Necessary  to  Obtain  SHARE  Library  Materials 

It  should  be  realized  that  the  SHARE  Distribution  Agency  (maintained 
for  SHARE  by  IBM)  processes  an  enormous  amount  of  material  in  connection  with 
share's  policy  of  distributing  library  routines  to  all  SHARE  members.   This 
agency  distributes  approximately  300,000  sheets  of  paper  and  2  1/2  million  cards 
per  month.   It  is  quite  obvious  that  this  is  an  enormous  task  and  that  it  takes 
time  within  the  SHARE  Distribution  Agency.   This  agency  has  set  up  a  mechanical 
procedure  for  these  distributions  which  attempts  to  achieve  efficiency.   It 
involves  such  things  as  the  submitting  of  coded  and  keypunched  order  cards,  etc. 
Experience  has  shown  that  the  transit  time  in  the  U.S.  mails  plus  the  time 
necessary  for  SHARE  to  process  requests  add  up  to  as  much  as  two  weeks  from 
the  time  at  which  a  request  is  initiated  until  the  material  is  all  in  hand. 
This  time  has  been  known  to  grow  to  at  least  six  weeks  in  those  cases  in  which 
the  program  is  of  an  unusual  nature,  involves  the  transfer  of  magnetic  tapes, 
or  is  in  a  category  for  which  there  are  infrequent  requests.   It  should  be 
stressed  that  this  procedure  with  which  the  Laboratory  has  to  deal  and  over 
which  it  has  no  control  is  a  somewhat  mechanical  one,  and  hence,  any  appeal 
for  special  treatment  or  extra  speed  has  little  effect.   The  requests  which 
are  submitted  go  through  a  long  pipeline.   Special  telephone  calls,  in 
addition  to  being  troublesome  and  expensive,  are  not  appreciated  by  the 
SHARE  Distribution  Agency  and  often  serve  only  to  confuse  the  progress  of 
the  material  through  the  pipeline. 
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Input/Output 

6.1,  General 

Of  prime  importance  to  every  user  is  the  facility  with  which  he  can 
handle  data  input  and  output  to  and  from  his  program.   Two  classifications 
of  routines  are  available  for  expediting  input  and  output:   the  Execution 
Coordination  Routines,  and  the  Input/Output  with  Conversion  Routines. 

The  Execution  Coordination  Routines  are  specifically  designed  to 
facilitate  the  input  and  output  operations,  such  as  reading  and  writing 
tapes,  punching  cards,  printing  on  the  on-line  printer,  backspacing  tape,  and 
skipping  files  and  records.   These  routines  are  discussed  in  detail  in 
section  6.2. 

The  Input/Output  with  Conversion  Routines  are  designed  to  operate  on  the 
data  itself  which  is  input  and  output  to  and  from  the  program  and  perform 
desirable  conversions  (such  as  from  BCD  to  binary,  decimal  to  octal)  on  it. 
These  routines  are  fully  discussed  in  section  6.3- 
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6.2.  Execution  Coordination  Routines 
6.2.1,  General 

The  Execution  Coordination  Routines  are  those  system  subroutines^ 
executive  routines  and  processors  which  remain  in  the  low  core  area^  below 
the  system  origin  during  execution  time.   (For  safety  the  user  of  absolute 
programs  should  not  0RG  below  5500   ).   It  is  intended  that  this  area  shall  be 
memory  protected  except  during  the  operation  of  the  Execution  Coordination 
Routines  themselves,  during  the  operation  of  the  system  Monitor,  during  the 
operation  of  the  system  translators,  and  during  the  execution  of  a  RELINQUISH 
(see  section  h.S)   problem.   Even  when  not  memory  protected,  the  routines 
will  be  there  initially  and  will  be  available  for  use  unless  destroyed. 

The   sense  indicators,  all  index  registers,  the  index  register 
mode  and  the  trapping  mode  will  be  preserved  for  the  user  by  these  routines. 
The  accumulator  and  MQ,  registers  will  not  be  preserved  and,  indeed,  will 
in  some  cases  contain  output  to  the  user. 

A  large  number  of  the  Execution  Coordination  Routines  will  be 
devoted  to  expediting  input  and  output.   These  routines  are  not  to  be 
confused  with  subroutines  available  to  the  user  from  the  library  which 
will  perform  numerical  conversion  on  the  user's  data.   Those  conversion 
routines  themselves  make  use  of  the  Execution  Coordination  Routines. 
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6.2.2.  Routines  for  Restricted  Tape  Units 

The  following  are  routines  which  operate  on  the  system  input  and 

output  tapes. 

The  system  input  tape  is  the  medium  onto  which  a  user's  program 
and  data  cards  are  transcribed  by  the  1^01  for  entry  into  the  709^- 

The  system  output  tape  is  the  medium  onto  which  is  written,  at 
execution  time  as  well  as  translator  processing  time,  all  information  which 
is  to  be  printed  or  punched  by  the  1^01. 

6.2.2.1,  SYSRIT:  Read  Input  Tape 

The  system  subroutine  SYSRIT  is  entered  by  a  calling  sequence 
of  the  following  form: 

TSX  SYSRIT, U 
TIX  FWA, ,E0F 
Normal  Return   -  -  - 
Upon  return  to  the  Normal  Return  the  image  of  the  next  card  on 
the  input  tape  will  be  in  the  block  beginning  with  the  location  whose 
address  is  FWA.   If  the  card  was  a  BCD  card  the  image  will  reside  in 
the  area 

FWA  through  FWA+13 

where  only  the  leftmost  12  bits  of  FWA+13  came  from  the  card  and  the 
rightmost  2U  represent  h   BCD  blanks.   If  the  card  was  a  binary  card 
(7  and  9  punches  in  col.  l),  then  the  column  binary  card  image  will  reside 
in  the  area 

FWA  through  FWA+27 

where  the  leftmost  2^  bits  of  FWA+26  are  the  last  which  came  from  the 
card  and  the  rightmost  12  bits  of  FWA+26  and  all  of  FWA+27  are  zeros. 
Upon  normal  return  the  accumulator  will  contain  zero  if  the 
card  to  be  read  upon  the  next  entry  to  SYSRIT  or  SYSLIT  is  BCD,  or  v.'ill  not  contai 
zero  if  the  card  to  be  read  upon  the  next  entry  to  SYSRIT  or  SYSLIT  is  binary. 
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If  E^F  is  zero,  the  job  will  be  terminated  upon  the  entry  to 
SYSRIT  which  reads  the  end-of-file  mark  which  delimits  the  Job. 

If  E^F  is  not  zero,  control  will  be  transferred  to  location 
E0F  upon  the  entry  to  SYSRIT  which  reads  the  end-of-file.   The  user  will 
not  be  permitted  to  read  past  the  end-of-file,  and  continued  entry  to 
SYSRIT  with  an  EjZ5f  exit  specified  will  cause  looping. 

6.2.2.1.1 #  SYSLIT:   Look  at  Input  Tape 

The  system  subroutine  SYSLIT  is  entered  by  a  calling  sequence  of 
the  following  form: 

TSX  SYSLIT, U 
TIX  FWA,,EjZ^F 
Normal  Return  -  -  - 

Upon  return  to  the  Normal  Return  the  image  of  the  next  card  on  the 
input  tape  will  be  in  the  block  beginning  with  the  location  whose  address  is 
FWA  in  accord  with  the  description  for  SYSRIT j sect ion  6.2.2.1. 

Upon  normal  return  the  accumulator  will  contain  zero  if  the  card 
to  be  read  on  the  next  entry  to  SYSRIT  or  SYSLIT  is  BCD,  or  will  contain 
non-zero  if  the  card  to  be  read  upon  the  next  entry  to  SYSRIT  or  SYSLIT  is 
binary. 

SYSLIT  does  not  advance  the  input  tape,  therefore  the  first  sub- 
sequent call  to  SYSRIT  or  another  call  to  SYSLIT  will  result  in  the  same 
card  being  placed  into  the  block  beginning  at  FWA. 

The  same  comments  on  EjZSF  as  apply  to  SYSRIT  (6.2.2.  If)  apply 
to  SYSLIT. 

6.2.2.1.2 > SYSLAH:   Input  Tape  Look-A-Head 

SYSLAH  is  a  core  location  whose  absolute  location  is  defined  in  the 
SCATRE  language.   SYSLAH  is  zero  if  the  next  card  to  be  read  by  SYSRIT  or 
SYSLIT  is  BCD  and  is  non-zero  if  the  next  card  to  be  read  by  SYSRIT  or  SYSLIT 
is  binary.   See  SYSRIT,  section  6,2.2.1,jand  SYSLIT,  section  6.2.2.1.1. 
The  core  location  SYSLAH  contains  the  same  information  as  is  returned  in 
the  accumulator  v/hen  using  SYSRIT  or  SYSLIT. 
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6.2.2.2.  SYSWjZiT:  Write  Output  Tape 

The  system  subroutine  SYSW0T  is  entered  by  a  calling  sequence 
of  the  form: 

TSX  SYSVI^,k 
TIX  FWA,,L 
Normal  Return  -  -  - 

The  BCD  line  image  beginning  in  location  FWA  and  continuing  through  location 
FWA.+L-1  will  be  written  on  the  system  output  tape.   A  maximum  of  133  BCD 
characters  (even  though  L  implies  more)  will  be  used,  from  left  to  right, 
the  first  of  which  will  be  detached  for  carriage  control.   When  L  =  0 
a  blank  line  will  be  output. 

The  first  character  of  each  record  determines  the  carriage  control 
for  printed  records.   This  character  is  detached  from  the  remainder  of  the 
record  and  is  not  printed.   The  code  for  the  carriage  control  character  under 
the  PORTHOS  system  is  as  follows: 


Left -most  character 
for  pre-print  skip 


Left -most  character 
for  post -print  skip 


Single  space 

Double  space 

Triple  space 

Sheet  eject  (skip  to  next  page) 

Skip  to  next  half  page 

Skip  to  next  quarter  page 

Skip  to  next  sixth  page 


blank  or   + 

1 

0 

s 
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CHAOS  operates  in  the  following  manner  for  the  above  control 
characters : 

blank  -  Spaces  one  line  before  printing. 

0  -  Spaces  two  lines  before  printing. 

-  Spaces  three  lines  before  printing.   The  blank,  0, 
and  -  must  be  changed  to  J,  K,  and  L  respectively 
for  proper  carriage  movement,  (within  CHAOS ) 

1  -  Immediate  page  eject;  skip  to  channel  1. 

2  -  Skips  to  channel  2  and  spaces  one  line  before  printing. 

(Note:  The  spaces  following  the  skips  are  necessary  for 
proper  positioning  since  the  carriage  tape  can  have  only 
one  punch  on  each  horizontal  line). 

h     -   Skips  to  channel  h   and  spaces  two  lines  before  printing. 

6  -  Skips  to  channel  6  and  spaces  three  lines  before  printing. 

/   -  Spaces  one  line  after  printing. 

S   -  Spaces  two  lines  after  printing. 

T  -  Space  three  lines  after  printing.   The  / ,    S,    and  T  are  not 
tested  individually  but  are  moved  to  a  pre-set  carriage 
control  order  for  proper  action.   Unlike  their  corresponding 
pre-print  spacings,  these  characters  are  correct  as  they 
stand  for  the  lUOl  control  carriage  instructions. 

A  -  Page  eject;  skip  to  channel  1,  after  printing  the  line. 

B  -  A  post-print  skip  to  channel  2  is  given  before  the  line  is 
printed.   After  printing,  a  one-line  space  order  is  given 
for  proper  positioning  as  described  under  6. 

D  -  A  post-print  skip  to  channel  h   is  given  before  the  line  is 
printed  with  a  two-line  space  order  following  the  printing. 

F  -  A  post-print  skip  to  channel  6  is  given  before  the  line  is 

printed  with  a  three-line  space  order  following  the  printing. 
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All  other  characters  are  simply  moved  into  a  pre-set  control 
carriage  order  to  allow  for  additional  spacing  required  by  special  jobs. 
Pre-print  single  spacing  is  not  possible.   A  discussion  of  the  carriage 
tape  channels  mentioned  below  may  be  found  in  Reference  Manual,  IBM  lUol 
Data  Processing  System;,  A2k-lk03-^. 

6.2.2.3.  SYSPCB:   Punch  Card  Binary 

The  system  subroutine  SYSPCB  is  entered  by  a  calling  sequence 
of  the  form: 

TSX  SYSPCB,^ 
TEC  FWA,  ,L 
Normal  Return       _  _  _ 

The  column  binary  card  image  beginning  in  location  FWA  and 
continuing  through  location  FWA+L-1  will  be  v/ritten  on  the  system  output 
tape.   A  maximum  of  960  bits  (26  words  and  2U  bits)  will  be  used,  from 
left  to  right.   The  7  and  9  bits  in  column  1  are  not  supplied  by  SYSPCB. 
,If  the  card  is  to  be  read  back  in  as  a  binary  card  the  user  must  provide 
them  in  the  card  image.   If  L  =  0,  one  word  will  actually  be  punched; 
if  L  >  27,  only  the  first  960  bits  (26  words  and  2k   bits)  will  actually  be 
punched,  the  remainder  being  ignored. 

6.2.2.U.  SYSPCD:   Punch  Card  Decimal 

The  system  subroutine  SYSPCD  is  entered  by  a  calling  sequence 
of  the  form: 

TSX  SYSPCD, U 
TIX  FWA, ,L 
Normal  Return      -  _  - 
The  BCD  card  image  beginning  in  location  FWA  and  continuing 
through  location  FWA+L-1  will  be  written  on  the  system  output  tape.   A 
maximum  of  80  BCD  characters  (l3  full  words  and  the  12  left-most  bits 
of  the  l^ith  word)  will  be  punched  into  the  card.  (A  word  count  L  of  zero 
will  result  in  a  blank  card). 
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6.2.2.5.  SYSPED:   Print  and  Punch  Decimal 

The  system  subroutine  SYSPED  is  entered  by  a  calling  sequence 
of  the  form: 

TSX  SYSPPD,i+ 
TIX  FWA, , L 
Normal  Return    -  -  - 

The  BCD  image  beginning  in  location  FWA  and  continuing  through 
location  FWA+L-1  will  be  written  on  the  system  output  tape.   A  maximum 
of  81  BCD  characters  will  be  used  in  punching.   The  first,  leftmost., 
character  will  be  detached  for  carriage  control  with  the  same  action  as  that 
described  under  section  6.2.2. 2,SYSW0T.   The  remaining  characters  will  be  both 
printed  and  punched  starting  with  print  position  1  and  card  column  1.  A  word 
count  L  of  zero  will  generate  both  a  blank  line  and  a  blank  card.   If  the  word 
could  L  exceeds  1^,  then  punching  is  as  described  above,  but  I5  words  are 
printed. 
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6.2.3-   Attached  (On-line)  Printer 

6.2.3.1.  SYSCAP:   Comment  Attached  Printer 

The  system  subroutine  SYSCAP  is  entered  by  a  calling  sequence 
of  the  following  form: 

TSX  SYSCAP, h 
TIX  FWA, ,L 
Normal  Return      _  _  _ 
The  BCD  line  image  beginning  in  location  FWA  and  continuing 
through  location  FWA+L-1  will  be  written  on  the  on-line  printer.   A 
maximum  of  120  BCD  characters  per  line  will  be  printed  even  though  L  is  such 
that  more  characters  than  120  are  implied.   The  motion  of  the  on-line  printer 
carriage  is  not  subject  to  programmer  control  and  the  left -most  character  of 
the  line  is  not  detached.   Successive  line  images  are  printed  on  successive 
lines  (single  spacing).   If  L  =  0,  then  nothing  is  output,  but  one  line  is  skipped. 
Line  images  printed  on-line  are  not  readily  visible  to  the  operator;  subroutine 
SYSSAP  (section  6. 2. 3- 2.)  may  be  used  to  make  them  visible. 

6.2.3.2.  SYSSAP:   Skip  Attached  Printer 

Subroutine  SYSSAP  is  entered  by  the  calling  sequence: 

CALL  SYSSAP 
Normal  Return-  -  - 
The  carriage  of  the  on-line  printer  is  skipped  forward  enough  lines  to 
separate  messages  written  on  the  on-line  printer  or  to  make  a  message  written 
on  the  on-line  printer  visible  to  the  operator. 
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6.2.4.  Routines  for  Access  by  the  User  of  Non-Restricted  Tape  Units 

The  following  routines  may  be  used  by  the  user  for  accessing  all 

input -output  units  except  those  tapes  restricted  by  the  system  for  its  own  use. 
The  calling  sequence  for  the  routines  in  this  section  has  the 

form: 

TSX  SYSxxx.U 
TIX  E0R,,UWIT 
TIX  LI0CL,,ETT 
TIX  E0F,F,RTT 
Normal  Return    -  -  - 

The  names,  SYSxxx,  of  the  subroutines  appear  below  with  their 
descriptions. 

6.2.4.1-  SYSRUD:  Read  Unit  Decimal 

A  real-select-decimal (RDS)  of  the  specified  unit  is  initiated,  if 
access  to  this  unit  is  permitted  by  the  system. 

6.2.4.2.  SYSRUB:   Read  Unit  Binary 

A  read-select-binary  (RDS)  of  the  specified  unit  is  initiated,  if 
access  to  this  \init  is  permitted  by  the  system. 

6.2.4.3.  SYSWUD:   Write  Unit  Decimal 

A  write-select-decimal  (WRS)  of  the  specified  unit  is  initiated, 
if  access  to  this  unit  is  permitted  by  the  system. 

6.2.4.4.  SYSWUB:   Write  Unit  Binary 

A  write-select-binary  (WRS)  of  the  specified  unit  is  initiated, 
if  access  to  this  unit  is  permitted  by  the  system. 

6.2.4.5.  The  Parameter  UNIT 

The  parameter  UNIT  is  the  unit  specification  and  may  not  be  an  absolute 
unit  address;  that  is,  it  must  be  defined  as  a  logical  tape  number. 
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The  use  of  l/O  units  is  closely  tied  to  the  permission  granted 
on  the  Problem  Specification  and  the  system  monitor  control  cards  which 
appear  in  a  job  deck. 

Only^  the  following  tape  numbers  may  be  used  as  utility  tapes. 

2 

3 

k 

9 

10 
The  pertinent  system  tapes  correspond  to  logical  tape  numbers 
as  follows : 

6  -  Output  Tape 

7  -  Card  Input  Tape 
Tapes  1  and  8  are  the  system  master  tapes. 


6.2.k.6.    The  Parameter  LI0CL 

The  parameter  LI0CL  is  the  first  Location  of  the  I^nput -Output 
Command  List,  under  the  control  of  which  the  data  channel  is  to  operate 
during  the  execution  of  this  select  operation.   It  is  strongly  urged  that 
the  IjZiCL  transmit  only  one  record.   The  reason  for  this  is  that  the 
system  Bad  Spot  Procedure  must  operate  on  that  assumption,  and  it  is  the 
system  Bad  Spot  Procedure  which  monitors  all  tapes  in  use  to  be  certain 
that  their  quality  remains  high.   Transmission  of  erroneous  information 
can  go  undetected  by  the  system  Bad  Spot  Procedure  if  more  than  one  record 
is  transmitted  by  a  single  select  and  Input-Output  Command  List.   Although 
the  user  may,  with  some  difficulty,  avoid  this  by  use  of  the  RTT  exit 
(see  section  6.2.4.11,),  notice  of  the  condition  of  the  tape  escapes  the 
system. 

Because  of  the  above  considerations,  the  user  is  restricted  to  the  use 
of  the  two  channel  commands 

IJZSCP 

I0RT 
and  their  non-transmitting  variations 

I0CPN 

I0RTN 
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and  the  command  TCH  may  be  used  to  link  non-consecutive  elements  of  the  list. 

The  command  I0RT  or  I0RTN  must  appear  and  is  assumed  to  terminate 
the  Input -Output  Command  List. 

In  order  to  use  any  other  channel  commands;  the  user  must  secure 
RELINQUISH  permission  (see  section  U.3.). 

6.2.U.7,  Waiting  for  Transmission  Termination 

Unless  a  unit  is  specified  which  may  not  be  accessed  by  the 
user,  or  an  improper  l/O  command  list  appears  at  LIjZJCL,  the  select  will 
be  initiated  and  the  channel  set  transmitting.   Return  is  made  to  the  Normal 
Return  immediately,  without  waiting  for  the  l/O  process  to  terminate. 

If  the  user  is  forced,  or  desires,  to  wait  at  any  point  in 
the  program  for  the  transmission  to  be  completed,  he  can  do  so  by  entering 
another  system  subroutine  which  will  accomplish  the  delay.   Description 
of  this  routine  will  be  deferred  until  section  6.2.5-   Its  calling  sequence 
is,  however,  of  the  form 

TSX  SYST^W, k 
TIX   ,,UNIT 
Normal  Return    _  -  - 

If  it  is  neither  necessary  nor  desirable  to  wait  for  transmission, 
the  user  may  allow  his  program  to  continue  in  parallel  with  the  l/O 
transmission. 

The  returns  E0R,  E0F,  RTT  and  ETT  are  operative  whether  the 
user's  program  is  waiting  or  not. 

6.2.U.8  ,  EjZiR:  End-of -Record 

A  normal  end-of-record  condition  which  occurs  on  the  unit 
specified  will  cause  a  CPU  trap  and  control  will  be  transferred  to 
the  system  trap  processor. 

If  E0R  =  0,  the  trap  processor  will  return  immediately  to 
continue  operation  from  the  point  of  interruption.   In  particular,  if 
control  is  in  the  system  delay  routine,  control  will  be  returned  to  the 
delay  routine  which  will  then  return  control  to  the  user. 
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If  EpR  ^  0,    the  trap  processor  will  return  control  to  the  subroutine  at 
location  UpR   with  the  number  of  words  transmitted  by  the  last  channel  command 
in  the  address  of  the  AC.   The  results  of  a  Store-Channel  instruction  (which  was 
executed  at  the  end  of  the  data  transmission)  may  be  placed  in  the  logical  AC 
by  executing  the  instruction  CAL  0,1  since  index  register  1  contains  the  compleme: 
of  the  address  of  these  results.   The  contents  of  index  register  k   are  such  that 
return  should  be  made  to  1,^  by  the  E0R  subroutine  when  it  is  finished  so  that 
the  trap  processer  may  restore  the  proper  contents  of  the  various  registers,  and 
res\ime  the  interrupted  programs  at  the  point  of  the  interruption. 

6.2.U.9»  E)Z!iF:   End-of-File 

All  of  the  preceding  discussion  of  EJZ^R  is  applicable  to  E)Z5f  when 
reading,  except  that  no  information  concerning  the  word  count  or  Store-Channel 
instruction  is  available  to  the  user  in  the  AC  or  in  index  register  1  upon 
transfer  to  E0F  after  a  trap  has  occurred. 

6.2.i4-.10,  ETT:   End -of -Tape 

When  the  trap  processor  is  entered  while  writing  because  of  a  normal 
end-of-record  or  end-of-file  trap,  the  end-of-tape  indicator  for  the  channel 
containing  the  specified  unit  is  tested.   If  the  end-of-tape  indicator  is  on, 
the  processor  takes  the  action  indicated  by  ETT  before  it  looks  at  E0R  or  E0F. 

If  ETT  =  0  the  trap  processor  will  continue  on  to  interrogate 
the  E0R  or  E0F  condition. 

If  ETT  ^  0  the  trap  processor  will  transfer  control  to  ETT  with 
the  contents  of  the  AC  and  index  register  1  as  described  in  section  6.2.1+.8, 
E0R:  End-of -Record.    The  contents  of  index  register  k   will  be  such  that  the 
ETT  subroutine  should  return  control  to  l,h   when  it  has  finished.   When 
control  is  returned  to  the  trap  processor  the  EpR   or  E0F  conditions  will  then 
be  interrogated  normally. 

If  on  exit  from  RTT  (see  section  6.2.i+.ll.),  an  End-of -Tape  condition 
has  been  detected,  then  control  does  not  go  to  ETT. 

If  an  ETT  is  encountered  while  writing  on  a  scratch  tape  or  on  a  save- 

mount  tape  with  no  second  savemount  tape  specified,  the  operator  will  necessaril 
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6.2.U.11.  F.RTT:  Rediindancy  Check,  Tapes 

When,  during  a  read  or  write  operation  on  an  l/O  unit,  a 
redundancy  check  occurs,  the  CHJ  is  trapped  immediately  and  control 
is  transferred  to  the  system  trap  processor. 

If  both  F  =  0  and  RTT  =  0,  then  a  backspace-record  (BSR) 
is  executed  on  the  specified  unit  and  reading  or  v/riting  is  retried  ten 
times.   If  after  ten  tries  the  operation  is  still  unsuccessful,  the  job 
will  be  terminated  with  comments  to  the  user  and  the  operator  regarding 
the  bad  tape  or  unit. 

If  F  =  0  and  RTT  /  0,  then  a  backspace-record  (BSR)  is  executed 
on  the  specified  unit  and  reading  or  writing  is  retried  ten  times.   If 
after  ten  tries  the  operation  is  still  unsuccessful,  then  the  user's 
subroutine  at  location  RTT  is  entered  with  the  number  of  words  transmitted 
by  the  last  channel  command  in  the  address  of  the  AC.   The  results  of  the 
Store-Channel  instruction  may  be  placed  in  the  logical  AC  by  executing  the 
instruction  CAL  0,1  since  index  register  1  contains  the  complement  of  the 
address  of  these  results.   The  contents  of  index  register  h   are  such  that  the  RTT 
subroutine  should  return  control  to  1,4  when  it  is  finished. 

At  the  time  RTT  receives  control,  the  tape  is  positioned  at  the 
beginning  of  the  record  in  which  the  check  occurred. 

If  both  F  ^  0  and  RTT  ^   0,  then  the  user's  RTT  subroutine  with  the 
contents  of  the  AC  and  index  register  1  is  entered  as  stated  in  the  paragraph 
immediately  above.   Again,  the  contents  of  index  register  h   are  such  that  the 
RTT  subroutine  should  transfer  control  to  l,k   when  it  is  finished.   At  the 
time  RTT  receives  control  the  tape  will  be  positioned  at  the  end  of  the 
record  in  which  the  check  occurred. 

6.2.h.l2,    Buffering  by  User  for  l/O  Operation 

The  foregoing  descriptions  of  the  select  routines  are  based  on 
the  assumption  that  they  are  not  providing  automatic  l/O  buffering.   Indeed, 
the  facilities  are  provided  so  that  a  user  may  do  his  own  buffering. 
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6.2.5'  SYST0W:   Trap  or  Wait 

The  system  subroutine  SYST0W  is  entered  by  a  calling  sequence  of 
one  of  the  two  following  forms. 

6.2.5.1.  Call  Sequence  for  Delay  if  Unit  is  Active 

TSX  sysT^w, k 

TIX   ,,UNIT 

RETURN     

where  UNIT  is  as  described  in  section  6.2.^.5' 

If  the  input/output  unit  specified  by  UNIT  is  active,  SYST0W 
will  delay  until  the  action  has  been  terminated  and  checked,  and  then 
return  control  to  RETURN. 

6.2.5.2.  Call  Sequence  for  Immediate  Return  if  Unit  is  Active 

CALL      TSX  SYST0W,i| 

TIX  TRAPX,,UMIT 
RETURN      -  -  - 
where  UNIT  is  as  described  in  section  6.2.U.5. 

If  the  input/output  unit  specified  by  UNIT  is  active,  SYST0W 
will  return  immediately  to  RETURN.   If  it  is  inactive  SYSTjZiW  will  return 
immediately  to  TRAPX  with  the  complement  of  the  location  CALL  in  the 
address  of  the  accuinulator . 
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6.2.6.  Non-Data  Select  Tape  Routines 

The  calling  sequence  for  all  of  the  routines  in  this  section 
has  the  form: 

TSX  SYSxxx,U 
TIX  ,,UWIT 

RETURN        

where  UNIT  is  as  described  in  section  6.2.^.5.^  and  xxx  represents  the 
characters  REW,  BSR,  BSF  or  WEF. 

6.2.6.1,  SYSREW:  Rewind  tape  specified  by  UNIT, 

6.2.6.2,  SYSBSR:  Backspace  record  of  tape  specified  by  UNIT. 

6.2.6.3,  SYSBSF:  Backspace  file  of  tape  specified  by  UNIT. 
6.2.6.k.  SYSWEF:  Write  end-of-file  on  tape  specified  by  UNIT. 
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6.2.7.  Tape  Skipping  Routines 

6.2.7.1.  SYSSKR:   Skip  Record  or  Records 

Calling  sequence: 

TSX  SYSSKR,  i+ 
TIX  m, ,UNIT 

RETURN         

where  m  is  an  integer  equal  to  the  number  of  records  to  be  skipped  and 
UNIT  is  as  described  in  section  6.2.i+.5-   An  end-of-file  mark  is  counted 
as  a  record.   Return  is  made  to  RETURN  immediately;  skipping  proceeds 
concurrently  with  computing.   An  end-of-file  mark  is  treated  as  a  record. 

6.2.7.2.  SYSSKF:   Skip  File  or  Files 

Calling  sequence: 

TSX  SYSSKF, U 
TIX  m, ,UNIT 
RETURN         -  -  _ 
where  m  is  an  integer  equal  to  the  number  of  files  to  be  skipped  and  UNIT 
is  as  described  in  section  6.2.^.5-   When  skipping  is  completed,  the  tape 
will  be  positioned  after  the  m-th  file  mark  from  its  present  position. 
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6.2.8.  Disk  File  Execution  Coordination  Routines 

6.2.8.1,  General 

The  PORTHOS  system  contains  a  set  of  routines  which  enable  the  user 
to  transfer  information  to  and  from  the  IBM  I3OI  Disk  File.   These  routines 
perform  the  basic  disk  operations  of  writing  format  tracks^  writing  data  with  and 
without  write-checking,  reading  data^  and  delaying.   The  interested  user  should 
see  IBM  Bulletin  D22-6576-3:.  "IBM  I3OI  Disk  Storage  with  IBM  7OOO  Series  Data 
Processing  Systems". 

At  present^  the  standard  operating  conditions  for  the  use  of  the  disk 
file  are 

1.  Module  0  is  available  to  all  users; 

2.  Module  1  is  reserved  and  not  available  to  users; 

3.  The  Home  Address  Operation  switch  on  the  763I  File  Control  is  on; 
k.      The  switches  which  allow  Format  tracks  to  be  written  are  on; 

5.  Format  tracks  specifying  one  466-word  record  per  track  are  written 
for  the  first  100  cylinders  (tracks  0  to  3999); 

6.  Format  tracks  specifying  two  229-word  records  per  track  are  written 
for  the  next  50  cylinders  (tracks  UOOO-5999). 

6.2.8.2.  Format  Tracks 

Format  tracks  will  be  written  according  to  the  following  speci- 
fications : 

1.  Home  Address  Identifier  (Home  Address  2's)  will  be  six 
characters,  or  one  word,  in  length;  and 

2.  Record  Addresses  six  characters,  or  one  word,  in  length 
will  precede  each  record  area. 

For  users  who  wish  to  exercise  the  option  of  writing  format  tracks 

according  to  their  own  specifications,  as  in  c)-(6),  section  6.2.8.3,  the 

"prefix"  which  is  automatically  written  by  the  format  routine  consists  of  Gap  1, 

HAl,  Gap  2,  HA2,  and  X  gap,  a  Record  Address,  a  Y  gap,  and  the  first  four 

characters  of  the  first  Record  Area.   The  format  track  must  be  written  in 

six-bit  mode 

All  format  tracks  are  checked  by  a  write-   Date:     k/l'^/bk 
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6.2.8.3.  Format  Track  Routine 

The  calling  sequence  for  the  routine  which  writes  format  tracks 


IS 

CALL  D.FMT 

TIX  TRACK; M0DULE , TYPE 

error  return  (unsuccessful  operation) 

normal  return  (successful  operation) 

where 

a)  TRACK   =  the  niimber  of  a  track  within  the  cylinder  for  which 

the  format  track  is  to  be  written  (60OO  <  TRACK  <  9999); 

b)  M0DULE  =  the  number  of  module  on  which  the  format  track 

is  to  be  written(M0DULE  =  o)' 

c)  TYPE    =  a  number  A  which  indicates  the  type  of  format  track 

to  be  written: 

(1)  if  A=l;  a  single  record  area  of  k66   words  will  be  formatted; 

(2)  if  A=2;  two  record  areas  of  229  words  each  will  be  formatted; 

(3)  if  A=3;  three  record  areas  of  I5I  words  each  will  be  formatted; 
(k)  if  A=k,  four  record  areas  of  111  words  each  will  be  formatted; 

(5)  if5<A<  SYS0RG  (=  current  upper  boundary  of  "low  core" 
execution  coordination  routines)  of  ir  A=0>  the  error  message 
"ILLEGAL  DISK  FORMAT  SPECIFICATION"  will  be  written  on  the 
user's  off-line  output  and  execution  will  be  terminated  via 
SYSERR; 

(6)  if  A  >  SYS0RG,  a  format  track  will  be  written  by  (a)  writing 
the  "prefix",  and  then  (b)  copying  U67  words  from  locations  A 
through  A  +  k66   to  complete  the  format  track. 

If  the  parameters  TRACK  and  MODULE  do  not  lie  within  the  indicated 
bounds,  the  message  "ILLEGAL  DISK  FORMAT  SPECIFICATION"  will  be  written  on 
the  user's  off-line  output  and  execution  will  be  terminated  via  SYSERR. 
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In  case  an  error  is  detected  during  the  writing  of  a  format  track, 
the  routine  will  attempt  four  additional  times  to  perform  the  indicated 
operation;  if  the  operation  still  cannot  be  completed  correctly  control  will 
be  returned  to  the  "error  return"  with  the  first  word  of  sense  information 
provided  to  the  79^9  Data  Channel  by  the  763I  File  Control  in  the  MQ,  register. 

The  contents  of  the  AC  and  MQ,  registers  are  not  saved. 

The  format  track  routine  will  delay  until  the  format  operation  is 
complete,  and  only  then  will  control  be  returned  to  either  the  "error  return" 
or  the  "normal  return";  an  entry  to  the  disk  delay  routine  is  neither  necessary 
nor  desirable. 

6.2.8. U.  Data  Transmission 

There  are  five  modes  (or  types)  of  operation  by  which  data  may  be 
transmitted  to  and  from  the  disk: 

1)  a  Track  With  Home  Address  operation, 

2)  a  Track  With  Addresses  operation, 

3)  a  Track  With  Wo  Addresses  operation, 
k)      a  Cylinder  operation,  and 

5)  a  Single  Record  operation. 

Data  to  be  written  onto  or  read  from  the  disk  must  appear  in  core 
in  a  single  block  of  the  desired  length;  no  means  is  provided  for  transmission 
of  multiple  blocks  in  a  single  operation. 

All  data  transmission  operations  are  terminated  with  a  channel 
trap. 

Written  records  which  do  not  fill  the  formatted  area  will  have  the 
remaining  words  filled  with  zeros. 
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6.2.8. 5»  Disk  Input-Output  Select  Routines 

The  calling  sequence  for  the  three  input-output  routines  is 
CALL    XXXXXX 
TIX     TRACK,  M0DULE,AIIRL0C 
TIX     MEMADR,TYPE,NBRWDS 
TIX     WjZiRECX, ,  CMPCHX 
TIX     E0RX, ,DATCHX 
return 


where 
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a)  XXXXXX  =  D.RD  for  a  read  operation 

=  D.WR  for  a  write  operation 

=  D.WAC  for  a  write  and  write-check  operation; 

b)  TRACK   =  the  number  of  the  track  on  which  the  operation  is  to 

begin  (O  <  TRACK  <  9999); 

c)  MODULE  =  the  number  of  the  module  on  which  the  operation  is  to 

take  place (m0DULE  =  o)' 

d)  AI)RL0C  =:  location  of  a  six-character  word  to  be  used  for  address 

verification  (ADRL0C  >  SYS^RG)  (see  Note  1  below); 

e)  MEMADR  =  location  of  the  first  word  of  a  block  of  WBRWDS  locations 

in  core  to  or  from  which  data  is  to  be  transmitted, 
starting  at  MEMADR  and  continuing  in  the  direction  of 
increasing  addresses  (MEMADR  >  SYS0RG); 

f)  TYPE    =  one  of  the  five  types  of  operation  specified  in 

section  6.2.8.^4,  (l  <  TYPE  <  5); 

g)  NBRWDS  =  the  number  of  words  to  be  transmitted  to  or  from  the 

block  at  MEMADR  (NBRWDS  >  O)  (see  Note  2); 

h)  N0RECX  =  locations  to  which  control  may  be  transferred  upon  the 

CMPCHX  execution  of  the  channel  trap  signifying  the  end  of  an 

EjZiRX  operation;  further  details  are  given  below  (each  must 

DATCHX  be  >  SYS0RG). 
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Kote  1:    In  the  case  of  a  type  1  (track  with  home  addresses)  operation^  a  word 
is  actually  transferred  to  or  from  location  ADRL0C^  depending  on  whether  a 
read  or  write  operation  is  specified;  this  is  the  home  address  identifier  for 
the  given  track.   In  the  case  operations  of  types  2,    3  and  h   are  specified, 
ADRL0C  contains  a  word  which  is  compared  against  the  home  address  identifier 
already  written  on  the  track,  but  nothing  is  read  from  or  written  into  location 
ADRL0C.   Note  that  only  the  first  two  characters  of  the  home  address  identifier 
are  actually  compared.   In  the  case  of  a  type  5  (single  record)  operation, 
ADRL0C  contains  a  word  which  is  compared  with  the  record  addresses  on  the 
specified  track;  the  last  four  bits  of  each  of  the  first  four  characters  and 
all  bits  of  the  last  two  characters  are  compared. 

Note  2:    The  quantity  NBRWDS  specifies  only  the  number  of  words  in  the  block  to 
be  transmitted  to  or  from  MEMADR;  thus  in  a  type  1  (home  address)  operation, 
an  additional  word  is  actually  transmitted  to  or  from  AIIRL0C,  but  this  word 
is  not  to  be  included  in  the  word  count  given  by  NBRWDS.   If  NBRWDS  is 
greater  than  the  actual  number  of  words  allowed  in  the  formatted  area,  only 
the  actual  number  of  words  will  be  transmitted. 

6.2.8.6,  Trap  Exits 

At  the  conclusion  of  a  disk  input -output  operation,  a  channel  trap 
is  executed.   The  trap  processer  saves  the  contents  of  the  AC  and  MQ,  registers, 
the  overflow  indicator,  and  index  register  h.      The  condition  causing  the 
trap  is  then  examined.   If  the  operation  was  successful,  and 

(1)  E0RX  =  0,  then  the  registers  and  indicator  will  be  restored,  and 
the  user's  program  will  resume  at  the  point  of  interruption;  if 

(2)  E0RX  /  0,  control  will  be  transferred  (by  a  TSX  E0RX,U  instruction) 
to  the  user's  routine  where  he  may  set  any  necessary  flags  before 
returning  via  a  TRA  ±,h   instruction  so  that  conditions  may  be 
restored  by  the  trap  processor  and  execution  resumed  from  the 
point  of  interruption. 


Date :  k/l.^^/Gk 

Section:  6.2.8. 

Page :  5 
Change : 


If  the  operation  was  unsuccessful  due  to  a  "no  record  found"  condition^  and 

(1)  W0RECX  =  0,  then  the  message  "NO  RECORD  FOUITO"  will  be  written 
on  the  user's  off-line  output  and  execution  will  be  terminated 
via  SYSERR;  if 

(2)  N^RECX  /  0,  control  will  be  transferred  with  a  word  of  sense 
data  in  the  logical  AC  (by  a  TSX  NjZSRECX,^  instruction)  to 

the  user's  routine,  where  he  may  set  any  necessary  flags  before 
returning  via  a  TRA  l,k   instruction  so  that  conditions  may  be 
restored  by  the  trap  processor. 

If  the  operation  was  unsuccessful  due  to  a  failure  of  a  write-check  operation 
to  check  properly;,  and 

(1)  CMPCHX  =  0,  then  the  message  "DATA  COMPARE  CHECK"  will  be 
written  on  the  user's  output  and  execution  will  be  terminated 
via  SYSERR;  if 

(2)  CMPCHX  ^  0,  control  will  be  transferred  with  a  word  of  sense 
data  in  the  logical  AC  (by  a  TSX  CMPCHX, i|  instruction)  to  the 
user's  routine,  where  he  may  set  any  necessary  flags  before 
returning  via  a  TRA  1,^  instruction  to  the  trap  processor  so 
that  conditions  may  be  restored  by  the  trap  processor  and 
execution  resumed  from  the  point  of  interruption. 

If  the  operation  was  unsuccessful  for  any  other  reason,  and 

(1)  DATCHX  =  0,  the  message  "DISK  DATA  TRANSFER  FAILURE.  ERRIKD=XXX— -XX 
will  be  written  on  the  user's  off-line  output,  and  execution  will 

be  terminated  via  SYSERR.   The  characters  XX. ..XX  will  be  36 
digits  containing  diagnostic  information  as  to  the  cause  of  the 
failure,  and  should  be  brought  to  the  attention  of  the  Consultants, 
Room  111b  ERL.   If 

(2)  DATCHX  ^  0, control  will  be  transferred  with  a  word  of  sense 
data  in  the  logical  AC  (by  a  TSX  DATCHX,^  instruction)  to  the 
user's  routine,  where  he  may  set  any  necessary  flags  before 
returning  to  the  trap  processor  via  a  TRA  1,U  instruction  so 

that  conditions  may  be  restored. 
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If  any  of  the  parameters  TRACK,  MODULE,  ADRL0C,  MEMADR,  TYPE,  NBRWDS, 
N0RECS,  CMPCHX;  E0RX,  and  DATCHX  do  not  satisfy  the  bounds  stated  in  b)  through 
h),  the  message  "ILLEGAL  DISK  l/0  SPECIFICATION"  will  be  printed  on  the  user's 
output;  and  execution  of  his  program  will  be  terminated  via  SYSERR. 

The  user  should  note  that  the  routines  D.RD,  D.WR,  and  D.WAC  are 
select  routines;  that  is,  they  initiate  input-output  activity,  but  do  not 
wait  for  it  to  be  completed.   Thus,  control  is  returned  to  the  "return" 
immediately  after  the  disk  has  begun  its  seeking  and  transmitting  operations. 

6.2.8.7.  Delay  Routine 

The  calling  sequence  for  the  delay  routine  is 
G0DLAY     CALL      D.DLY 

TIX       SEEKXT,,BUSYXT 
return 

a)  If  the  disk  is  not  busy,  control  will  be  immediately  returned  to  the  "return". 

b)  If  the  disk  is  seeking,  and 

(1)  SEEKXT  =  0,  the  delay  routine  will  wait  until  the  seek  operation  is 
completed;  if 

(2)  SEEKXT  /  0,  control  will  be  immediately  transferred  to  the  location  SEEKXT 

c)  If  the  disk  has  completed  the  seek  operation  and  is  busy  transmitting  data,  and 

(1)  BUSYXT  =  0,  the  delay  routine  will  wait  until  the  disk  is  no  longer  busy 
and  then  return  control  to  the  "return";  if 

(2)  BUSYXT  ^  0,  control  will  be  immediately  transferred  to  the  location  BUSYXT. 

The  only  conditions  not  saved  by  the  delay  routine  are  the  sign  and 
Q  bits  of  the  AC,  i.e.,  the  logical  AC  is  saved  and  restored. 

When  control  is  transferred  to  either  SEEKXT  or  BUSYXT,  index 
register  h   will  contain  the  two's  complement  of  the  location  containing  the 
CALL  D.DLY  instruction,  i.e.,  the  two's  complement  of  G^DLAY. 
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6.2.8.8,  Example  s 


a)  Write  a  format  track  for  two  records/track  in  the  152—  cylinder 
of  module  0. 

CALL      D.FMT 
TIX      6o6o,o,2 
TSX       HELP,i+ 


(help  is  the  user's  routine  which  indicates  any  format  writing  errors). 

b)  Write  and  check  a  home  address,  record  addresses,  and  records  on  one 
of  the  tracks  in  the  cylinder  just  formatted. 

CALL      D.WAC 

TIX       6OU7,O,H0MAD1 

TIX       BUFFA,1,U60 

TIX       0,,0 

TIX       0,,0 

return 

(HJZSMADI  contains  the  home  address  identifier  to  be  written; 
U60  words  are  called  for  since  there  are  two  records  of  229 
words  each  +2  record  addresses  to  be  written). 

c)  Read  the  records  (but  not  the  record  addresses)  just  written,  omitting 
the  last  10  words  of  the  second  record. 

CALL      D.RD 

TIX       6O^^7,O,H0MADI-- 
TIX       BUFFA,3,^^8 
TIX       0,,0 
TIX       0,,0 

return 

(only  kkS   words  will  be  transmitted). 
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d)     Write   a  record  of  200  words   from  BUFFC   into  the   second  record  area  of 
the   same  track,    and   set  D0NE^O  when  the   operation   is   finished. 
STZ  D0NE 

CALL  D.WR 

TIX  60i+7,0,BUFFA+230 

TIX  BUFFC,  5;. 200 

TIX  0,,0 

TIX  SETDIIN,,0 

return 


SETDUW 


STL 
TRA 


DjZiNE 
1.^ 


(BUFFA+230  contains  the  second  Record  Address). 

e)  Read  and  print  the  first  record  on  the  track,  using  routine  PRINT 

CALL      D.RD 


TIX 

60i+T,,0,BUFFA 

TIX 

BUFFD, 5.229 

TIX 

0,;0 

TIX 

0,,0 

CALL 

D.DLY 

TIX 

0,,0 

TSX 

PRINT,  i|- 

(BUFFA  contains  the  first  Record  Address). 
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6.2. 9»  Dumps  and  Recovery  Procedures 

6.2.9.1.  SYSPM:   Panel  Dump 

SYSPAW  provides  a  dynamic  dump  of  the  contents  of  the  machine 
indicators,  registers  and  lights.   Specifically;,  the  AC  with  Panel  Q  bits, 
MQ,  sense  indicators,  all  7  index  registers,  multiple  tag  mode  light,  sense 
lights,  AC  overflow  light,  MQ,  overflow  light,  divide  check  light,  l/O 
check  light,  and  whether  or  not  the  machine  is  in  the  trap,  storage  multi- 
plication, or  floating  point  trap  mode  are  printed.   This  routine  is  the 
same  as  that  which  produces  the  top  three  lines  of  a  system  dump; see 
section  U.2.5-2. 

The  calling  sequence  is: 

SCATRE : 

CALL  SYS PAN 
FORTRAN: 

CALL  SYS PAN 
MAD : 

EXECUTE  SYS PAN. 


6.2.9.2,  SYSD0D:  Dynamic  Octal  Dump 

A  system  dxmvp   subroutine  exists  which  allows  the  user  to  receive 
an  octal  dump  of  all  or  portions  of  core  during  the  execution  of  his  program. 
The  calling  sequence  for  SCATRE  is : 

CALL         .,  SYSD^D 
TIX      ,       FWA,,LWA 
Normal  Return 
where  FWA  =  First  word  of  core  to  be  dumped  and 
LWA  =  Last  word  of  core  to  be  diimped. 

FWA  and  LWA  can  be  absolute  addresses  or  symbols. 

SYSD0D,  when  called,  gives  an  octal  dump  of  the  locations  required 
and  then  returns  to  the  user's  program  at  Normal  Retui^n.   The  number  of  pages 
of  printout  required  for  this  diimp  is  considered  as  part  of  execution  pages 
output,  so  the  user  of  SYSDOD  should  remember  this  in  estimating  execution 
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pages  output.   SYSD0D  will  dump  8  core  locations  per  line  of  output  in  the 
same  format  as  the  system  dump,  see  section  U.2.5'2. 
An  example  of  the  use  of  SYSDOD  in  SCATHE: 
A    CLA    C 


B    STD  D 

CALL  SYSD0D 

TIX  A,,B 

CALL  SYSD0D 

TIX  C,,D 


C    BSS    50 
D    BSS    50 
The  example  above  will  dump  the  program  from  A  through  B  and  the 
storage  area  from  C  through  D. 

If  users  wish  to  use  SYSDOD  in  FORTRAN,  a  SCATRE  subroutine  must 
be  written  to  accomplish  this. 

SYSD0D  can  be  used  in  MAD  for  dumping  areas  of  data  storage,  with 
the  calling  sequence: 

EXECUTE   SYSD0D.  (LWA...FWA). 
The  following  is  a  short  program  in  MAD  showing  its  method  of  use. . 

VECTOR  VALUES  MATX  =  1,2,3,^,5,6,7,8,9,10,11 
EXECUTE  SYSD0D.(MATX(1O). ..MATX(O)) 
EKD  ^F  FR0GRAM 
To  dump  a  portion  of  a  MAD  program,  a  SCATRE  subroutine  must  be 
written. 
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6.2.9.3*  SYSCUP:   Clean  Up 

6.2.9.3.1,  General 

SYSCUP  is  an  Execution  Coordination  Routine  which  is  designed  to 
allow  the  user  to  retain  control  of  the  computer  for  a  limited  period  of 
time  after  his  job  has  been  terminated  via  SYSERR  or  operator  intervention 
in  order  to  permit  his  program  to  make  a  more  graceful  exit,  if  possible. 
Use  of  the  control  card  $  CLEAN  UP  in  the  first  group  of  $  Control  cards  is 
required. 

This  facility  has  quite  specialized  uses  and  is  not  offered  as 
the  standard  way  of  terminating  execution. 

6.2.9.3.2,  Operation 

If  a  $  CLEAN  UP  card  has  appeared  and  execution  is  terminated  via 
SYSERR  or  by  the  operator,  the  Execution  Coordination  Routines  will  determine 
if  the  user  has  planted  the  location  of  his  termination  routine  through  the 
use  of  SYSCUP  (or  a  routine  which  calls  SYSCUP).   If  the  user  has  planted  the 
location  of  his  termination  routine,  control  will  be  transferred  to  it  for 
an  interval  of  time  which  is  the  lesser  of  two  minutes  or  ten  percent  of  the 
total  time  estimate.   If  the  user  has  not  planted  the  location  of  a 
termination  routine,  control  will  be  given  to  SYSERR. 

Under  no  circumstances  will  control  be  returned  to  the  user  via 
SYSCUP  more  than  once  in  any  particular  job.   In  any  case,  note  that  the 
particular  point  where  termination  occurred  might  not  be  known  to  the  user. 
Therefore,  provision  must  be  made  by  the  user  to  regress  to  a  known  point. 

If  SYSCUP  is  entered  without  a  $  CLEAN  UP  card  or  if  SYSCUP  is 
re-entered  after  control  has  been  returned  to  the  user  to  clean  up,  control 
will  be  immediately  given  to  SYSERR.   If  the  operator  intervenes  during 
clean  up,   the  normal  intervention  sequence  will  be  followed. 

6.2.9.3.3,  Auxiliary  Routine  FCLEAN 

FCLEAJNT  is  a  relocatable  library  subroutine  which  can  be  called 
especially  by  FORTRAN  to  provide  the  facilities  described  under  CASE  1  of 
use  of  SYSCUP  in  the  FORTRAN  language  below. 

FCLEAN  requires  8  storage  locations. 
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6.2. 9- 3-^.  Use  of  SYSCUP 

In  the  SCATRE  language: 

TSX  SYSCUP,  k 

TXH  LjZiC 

Normal  Return 
where  LjDC  is  the  address  of  the  location  to  which  the  user  wishes  control 
transferred  after  the  first  attempted  termination  of  the  job. 

If  LpC  is  zero,  control  will  be  transferred  to  SYSERR  upon  term- 
ination.  SYSCUP  can  be  entered  as  many  times  as  desired  in  order  to  update 
a  "dynamic"  termination  point. 

In  the  FORTRAN  language: 

CASE  l) 

ASSIGN  1  TO  M 

G^  T^  M,    (1,2) 

1  ASSIGN  2  TjZi  M 

CALL  FGLEAN   (M) 


2    (Termination  routine) 

In  this  case  control  will  always  be  transferred  to  statement 

2  at  attempted  termination. 

CASE  2) 

CALL  SYSCUP   (M) 

where  M  is  the  argument  of  an  ASSIGN  statement. 

In  this  case  control  will  be  transferred  to  the  last  statement 
number  assigned  to  M  when  termination  is  attempted. 

FORTRAN  considers  the  appearance  of  an  ASSIGN  statement  without 
an  assigned  G0  T0  a  so\irce  program  error. 

In  the  MAD  language : 

CASE  l) 

EXECUTE  FCLEAN. (L) 

where  L  is  a  variable  of  the  statement  label  mode  or  a  statement  label. 

At  termination  time  control  will  be  transferred  to  the  statement 
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L^  the  value  of  L  having  been  determined  and  set  at  the  most  recent  prior 
call  of  FCLEM. 

CASE  2) 

EXECUTE  SYSCUP.  (L) 

where  L  is  a  variable  of  the  statement  label  mode  or  a  statement  label. 

At  termination  control  will  be  transferred  to  the  statement  label 

assigned  to  L. 
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6.2.9. 
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6.2.10.  System  Floating  Point  Trap  Procedure  and  Associated  Routines 

At  execution  time,  at  the  time  when  the  users  program  receives 
control  of  the  machine,  floating  point  trap  mode  is  on.   At  this  time, 
the  system  is  set  to  process  the  occurrence  of  a  floating  point  trap 
according  to  the  following  rules: 

a.  MQ,  underflow  on  floating  add,  subtract  or  multiply  or  double - 
precision  orders  causes  MQ  to  be  set  to  zero; 

b.  AC  underflow  on  single-precision  floating  divide  is  ignored; 

c.  All  other  floating  point  traps  will  result  in  the  termination 
of  execution  and  return  to  the  system  via  SYSERR. 

6.2.10.1,  SYSIUT  (FTRAP):   Ignore  Underflow  Trap 

The  normal  mode  of  floating  point  trap  processing  may  be  altered 
from  that  described  above  by  executing: 

EXECUTE     SYSIUT,  (MAD) 

or  EXECUTE  FTRAP. 

CALL        SYSIUT  (SCATRE) 

or  CALL  FTRAP 

CALL        SYSIUT  (FORTRAN) 

or  CALL  FTRAP 

Thereafter,  floating  point  traps  will  be  processed  by  the  system 
according  to  the  following  rules: 

a.  MQ  is  set  to  zero  on  MQ  underflow  on  floating  add,  subtract 
or  multiply  or  double -precision  orders; 

b.  AC  underflow  on  floating  add,  subtract  or  multiply  or  double- 
precision  orders  will  cause  AC,  QP,  and  MQ  to  be  set  equal  to 
zero,  then  proceed; 

c.  AC  underflow  on  single-precision  floating  divide  is  ignored; 

d.  MQ  underflow  on  single-precision  floating  divide  will  cause 
MQ  to  be  set  equal  to  zero,  then  proceed; 

e.  All  occurrences  of  AC  and/or  MQ  overflow  will  result  in  the 
termination  of  execution  and  return  to  the  system  via  SYSERR. 
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6.2.10.2.  SYSRUT  (NFTRAP) :   Restore  Underflow  Trap 

The  processing  of  floating  point  traps  may  be  returned  to  the 
normal  mode  by  executing: 

execute  sysrut ^ 

(mad) 

or  EXECUTE  WFTRAP. 

CALL  SYSRUT 

(SCATRE) 
or   CALL  NETRAP 

CALL  SYSRUT 

(FORTRAN) 

CALL  NFTRAP 

NOTE:   The  floating  point  trap  processor  always  causes  references  to  odd 
addresses  by  double-precision  orders,  except  DST,  to  result  in  termination 
of  execution  via  SYSERR  with  the  comment: 

DP  ERR0R  TRAP  AT  XXXXX. 
when  the  floating  point  trap  mode  is  on. 
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6.3.  Input/Output  With  Conversion 
6.3'1»  General 

The  routines  described  here  are  those  which  are  available  to  the 
user  to  provide  conversion  of  data  as  well  as  input  and  output  data 
transmission.   These  routines  use  the  system  Execution  Coordination  Routines 
for  transmission  of  data. 

The  names  of  the  routines  with  the  function  and  calling  sequence 
of  each  appear  in  section  6. 3' 5-   The  Format  Specification,  described  in 
section  6.3.2.,  and  the  Input/Output  List,  described  in  section  6.3.3.,  are 
common  to  all  the  routines  in  section  6.3.5. 

All  the  routines  and  format  specifications  in  this  section  are 
discussed  as  if  they  were  used  in  SCATRE  programs.   The  calling  sequences  for 
use  with  other  languages  may  be  found  in  the  respective  language  manuals. 
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6.3'2.  Format  Specifications 

When  information  is  passed  between  a  Hollerith  card  and  a  computer, 
it  is  necessary  to  specify  precisely  how  this  information  is  allocated 
among  the  available  columns  of  the  card.   Similarly^  whenever  information 
is  to  be  printed  by  a  printer,  it  is  necessary  to  specify  how  this 
information  is  to  be  allocated  among  the  columns  available  on  the  printer. . 
A  description  of  each  allocation  is  called  a  format  specification.   Usually, 
but  not  always,  a  list  of  variables  (see  section  6.3.3v  The  Input-Output 
List)  whose  values  are  to  be  printed,  punched,  or  read,  is  associated  with 
a  format  specification.   Occasionally,  the  information  is  contained  entirely 
in  the  format  specification,  so  the  list  may  be  empty. 

In  substance,  a  format  specification  is  a  string  of  alphanumeric 
characters  and  a  restricted  subset  of  special  characters.   All  characters 
which  may  be  used  are  mentioned  explicitly  in  the  following  subsections 
of  this  section. 

A  format  specification,  in  order  to  be  used,  must  be  stored  in 
successive  locations;  therefore,  it  is  stored  in  groups  of  six  BCD  characters 
per  location.   A  format  specification  should  be  stored  in  such  a  way  that 
the  first  character  in  the  specification  is  the  left-most  of  the  six  in  a 
location.   If  the  specification  is  stored  in  such  a  way  that  the  first 
character  is  not  the  left-most,  then  those  characters  to  the  left  of  it 
must  be  blanks. 

When  a  format  specification  is  to  be  written  using  an  assembly 
language,  e.g.,  SCATRE,  the  most  efficient  way  of  writing  it  is  to  use  the 
BCI  or  BCD  pseudo-operations. 

The  format  specification  may  be  written  so  that  the  consecutive 
locations  are  in  either  descending  order  or  in  ascending  order.   If,  in 
the  calling  sequence  to  one  of  the  routines  described  in  section  6.3.5t  the 
decrement  of  the  calling  sequence  word  which  contains  the  FORMAT  parameter  in 
the  address  is  zero,  then  the  conversion  routine  will  assume  that  the 
consecutive  locations  containing  the  format  specification  are  in  ascending 
order.   If  the  decrement  is  non-zero,  the  conversion  routine  will  assume 
that  the  consecutive  locations  containing  the  format  specification  are  in 
descending  order. 
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6.3-2.1^  Single  Line  Format  Specifications 

A  single  line  format  specification  has  the  form: 

mm  Tl    * 

1^,  l^,  ...,  i^ 


II   Tl 


where  the  T.'s  are  terms  of  the  format  specification,  the  characters  , 
separate  pairs  of  terms  and  are  included  in  the  format  specification, 
and  the  character  "*"  follows  the  last  term  of  the  format  specification 
and  must  appear  in  it;  it  serves  to  terminate  the  specification. 
Any  term  T.  may  be  one  of  the  following: 

(a)  a  Basic  Field  Description  (see  section  6. 3-2. 12,,  Basic 
Field  Descriptions-a  Resume); 

(b)  a  Multiple  Basic  Field  Description  (see  section  6.3.2.13#* 
Multiple  Basic  Field  Descriptions); 

(c)  a  Scaled  Field  Description  (see  section  6. 3.2. l4,.  Scaled 
Field  Descriptions). 

6.3.2.2,  Multiple  Line  Format  Specifications 

A  single  format  specification  may  be  made  to  refer  to  more  than 
one  line  or  card  at  the  time  it  is  used. 

A  multiple  line  format  specification  has  the  form 


W  •••/ Vi/"  ' 


q-1'   q 

where  each  \.    may  have  the  form  of  a  complete  single  line  format  specification 
without  a  terminating  *  but  with  carriage  control  if  required  (see  Appendix  l); 
any  A.,  may  be  blank  to  indicate  a  blank  line  or  card  for  output  or  an  ignored 
card  for  input;  the  character  /  is  used  to  terminate  a  single  line  format 
specification  X;  and  the  character  *  is  used  to  terminate  the  last  single 
line  format  specification  of  the  multiple  line  format  specification. 

6.3.2.3,  Format  Fields 

Each  format  specification  describes  successive  fields  across  the 

available  columns,  starting  from  the  left.   If  the  specification  describes 

fewer  than  the  total  number  of  available  columns,  the  remainder  of  the  line 

or  card  will  be  filled  in  with  blanks.   At  execution  time,  if  a  format 
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specification  is  encountered  which  describes  more  than  the  total  number 
of  available  columns,  an  error  indication  will  normally  be  given  and  the 
problem  terminated. 

The  eight  types  of  fields  which  may  be  described  in  a  format 
specification  appear  in  the  followihg  list:  .  . 

S      -  field  skip  or  blanli  information 

X      -  field  skip  or  blank  information 

I      -  field  integer 

F      -  field  fixed  point  number 

E      -  field  floating  point  number 

^  or  K  -  field  octal  number 

A  or  C  -  field  BCD  characters 

H      -  field  Hollerith  information 

The  terminology  "fixed  point  number"  used  in  connection  with 
F-fields  and  "floating  point  n'omber"  used  in  connection  with  E-fields 
is  rather  unfortiinate  but  is  difficult  to  avoid.   The  terms  are  used  to 
provide  a  means  of  distinguishing  the  form  of  the  information  which 
occupies  an  F  field  from  the  form  of  the  information  which  occupies  an 
E  field  and  throughout  this  section  is  used  solely  for  that  purpose.   In 
both  cases  the  internal  form  is  floating  point. 

Format  Field  is  a  name  for  two  concepts  taken  together.   First, 
there  is  the  Basic  Field  Description.   This  is  an  item  which  appears  in 
a  format  specification.   Second,  there  is  the  Field  Information.   This 
refers  to  the  information  and  the  form  of  the  information  which  may  appear 
on  a  card  or  a  printed  line  in  the  field  described  by  the  corresponding 
Basic  Field  Description. 

Both  the  Basic  Field  Description  and  the  Field  Information 
for  each  of  the  types  of  format  fields  are  described  in  the  following 
sections  (sections  6.  3-2.  ^,  through  6.3.2.10»). 
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6.3.2.h,    S-Fields 

6.3-2..h.l,    S-Field  Basic  Field  Description 

The  basic  field  description  for  an  S-field  has  the  form: 

Sn 
where  the  character  S  indicates  an  S-field  and  n  is  a  decimal  integer 
equal  to  the  number  of  columns  in  the  field. 

6. 3- 2. ^.2.  S-Field  Information 

If  an  S-field  basic  field  description  appears  in  a  format 
specification  which  is  used  for  inputs  any  information  which  appears  in 
the  corresponding  columns  will  be  ignored. 

If  an  S-field  is  used  for  output  the  corresponding  col\:mms 
will  be  blank. 

For  example,  the  basic  field  description 

S31 
indicates  that  thirty-one  columns  are  to  be  skipped. 


6.3.2.5.  X-Fields 


6.3.2.5.1.  X-Field  Basic  Field  Description 

The  basic  field  description  for  an  X-field  has  the  form 

nX 
where  the  character  X  indicates  an  X-field  and  n  is  a  decimal  integer 
equal  to  the  number  of  columns  in  the  field. 

6. 3 -2. 5 '2,  X-Field  Information 

If  an  X-field  basic  field  description  appears  in  a  format 
specification  which  is  used  for  input ,  any  information  which  appears 
in  the  corresponding  columns  v.dll  be  ignored. 

If  an  X-field  is  used  for  output  the  corresponding  columns  will 
be  blank. 
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6.3.2.6.    I-Fields 

I-fielis  are  fcr  input/cutput  cf  ±-2'"'^'^  integers  vhcse  ^lacr-ine 
representauicr.  is  a  f ixei-rcir.-  in-eger  (-lie  cirarj-  pcin"  is  "c  -'ce  rigr.T 
bit   35   in  SC--I?Z   =_.::  :i^,    a..-   :etw-een  bi-s   17  and  l5   in  ?0R3Lyr). 


6.3.2.6.1.    I-Field  Basic  Field  Description 
The   casic   field  description  of  an 

In 
where  the   character     I     indicates   an   I-field  and  the  de 
the  n'LLHicer  of  col'^-inms   in  the   field. 


ield  has  ^he   form 


nsl 


=7"       n       1  ■ 


6.3.2.6.2,    Lnput   fron  i-yields 


"he  3CD   infcmaticn   in  an  I-field  nia"r  have  anv  cf  the   fcUcvn'rLns 


lorms 


-Ha 

-m 
m 


where  m  is   an  'JmsigneiO.  ^.ec 


Lai  in.eger    (wiThQ'j.t   decimal  point) 
^  ^   .^D~^    -~  "'  "  —  ^— '^ :; 'I '-T 


In  FORTRAN^    this  limitation  is 

"■7 
0  <  1:1  <  2~  -1  =  1^1C71. 


(^) 


(^) 


A  string  of  blanks  nav  precede  cr  fcllcv  the  3CD  infomaticn  cr  ce 
inserted  between  any  two  characters  (cr  the  field  naj"  contain  cnl^r  blanks). 

A  string  of  blanks  fcllc"/ring  the  ECD  information  is  not  assumed 
to  represent  trailing  zerces  -  all  digits  cf  the  decimal  integer  tc  be 
input  must  be  punched. 

The  foUoTfring  ccnditicns  a^-e  treated  as  1  C  errcrs  (section  a-S-OO')- 

a)  m  violates  condition  (+)  above/ 

b)  the  non— blank  characters  in  the  l-field  do  not  have  one 
cf  tne  forms  -rm,  -m,  m. 
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These  conventions  govern  conversion  of  the  BCD  information  to 
the  equivalent  fixed-point  binary  integer : 

a)  If  there  is  no  sign  in  the  field  (the  form  m)  the  integer 
is  assumed  to  be  positive. 

b)  All  blanks  in  the  field  are  ignored. 

c)  If  the  entire  I-field  is  blank,  the  result  of  I-conversion 
is  a  minus  zero. 

6.3.2.6.3,  Output  in  I-fields 

The  contents  of  the  associated  computer  word  are  assumed  to  be 
a  fixed-point  integer  c.   It  is  converted  to  a  BCD  string  m  if  c  >  0  or  ' 
c  =  +0,  to  a  BCD  string  -m  if  c  <  0  or  c  =  -0,  where  m  is  an  unsigned 
decimal  integer  without  a  decimal  point. 

If  the  length  of  the  BCD  string  does  not  exceed  the  field  width, 
the  BCD  string  is  output  right-justified  in  the  field;  characters  in  the 
field  to  the  left  of  the  string  are  blanks. 

If  the  length  of  the  BCD  string  exceeds  the  field  width,  an 
l/O  error  is  detected  (see  section  6. 3-6.3.) • 

6.3.2.7.  F-Fields 

F-Fields  are  for  input/output  of  decimal  numbers  whose  machine 
representation  is  a  standard  709^  single-precision  floating-point  number. 
A  number  output  in  an  F-field  has  the  form: 

+  ji  .  A. 
where  li  is  a  decimal  integer  and  X   a  decimal  fraction;  that  is,  the  magnitude 
of  a  n'omber  outp;at  in  an  F-field  is  indicated  solely  by  the  position  of  the 
decimal  point.   The  E-field  makes  available  another  output  format  for 
floating-point  numbers  (see  section  6o3»2.8^. 
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6.3.2.7.1»  •  F-Fleld  Basic  Field  Description 

The  basic  field  description  of  an  F-field  is  of  the  form 

Fn.k 

where  the  character  F  indicates  an  F-field,  the  unsigned  decimal  integer  n 
is  the  number  of  columns  in  the  field,  and  the  decimal  point  separates  the 
unsigned  decimal  integers  n  and  k.   The  interpretation  of  the  unsigned 
decimal  integer  k  is  given  in  section  6. 3. 2. 7» 2, for  input  and  in  section 
6.3.2.7.3,  for  output. 

6.3.2.7.2,  Input  from  F-fields 

The  BCD  information  in  an  F-field  may  have  any  of  the  forms : 

(1)     .   _      (2)_  __ 


forms  with  a 

forms  without  a 

decimal  point 

decimal  point 

forms  with  an 

+  H  .  \  E  +  € 

+  n  E  +  e 

exponent 
(in  "scientific 

(J  .  X  E  +  e 

n  E  +  e 

notation") 

+  la  .  \  E  e 

+  a  E  e 

ti  .  \  E  6 

a   E  e 

+  H  .  k   +   & 

+  n  +  e 

|i  .  A.  +  6 

Q   +   e 

forms  without 

+  |j.  .  \ 

+  n 

an  exponent 

H    .    X 

n 

Table  6-1 


In  column  (l)  of  Table  6-1, 


is  a  decimal  integer,   X  is  a 


decimal  fraction,   .   separates  n  and  k.      Either  p,  or  X  may  be  absent 
and  is  then  assum.ed  to  be  zero.   If  the  BCD  information  contains  a  decimal 
point,  the  parameter   k  in  the  F-field  basic  field  description  Fn.k  is 
ignored  by  the  conversion  subroutine. 
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In  the  forms  of  column  (2)  of  Table  6-1,    fi  is  a  decimal  integer. 
Let  Fn.k  be  the  basic  field  description  of  this  F-field;  then  a  decimal 
point  is  assumed  to  precede  the  k  rightmost  digits  of  fi.   If  fi  has 
d  <  k  digits,  they  are  assumed  to  be  preceded  by  k  -  d  zeroes;  that  is, 
if  the  basic  field  description  is  F8.i4-,  -11E2  and  -0011E2  both  represent 
the  same  number. 

The  initial  sign,  if  any,  is  the  sign  of  iJ..\  or  Q.      If  |a.\  or  Q, 
is  not  preceded  by  a  sign,  it  is  assumed  positive. 

In  the  forms  with  an  exponent,  the  signed  or  unsigned  decimal 
integer  +e^   -e^  or   €   following  X     is  the  exponent  of  the  povrer  of  10 
by  vrhich  la.X  or  Q,     is  to  be  multiplied.   If  no  sign  precedes  e,   then 
e   is  assumed  to  be  positive.   The  character  E   separates   |i.X  or  Q, 
and  the  exponent.   The  i-i.X  or  Q     of  a  form  without  an  exponent  (second 
row  of  table  6-l)  is  not  multiplied  by  a  power  of  10. 

A  string  of  blanks  may  precede  or  follow  the  BCD  information  or  be 
inserted  between  any  two  characters  of  the  BCD  information,  or  an  F-field  may 
contain  only  blanks. 

A  string  of  blanks  follov;-ing  the  last  character  of  |-i.\  or  D, 
is  not  assumed  to  represent  trailing  zeroes;  all  digits  except  leading 
zeroes  of  the  number  to  be  input  must  be  punched. 

The  following  conventions  may  be  used  to  abbreviate  the  BCD 
information  in  an  F-field: 

a)  if  [i.X  or     fl  is  positive,  its  sign  may  be  omitted; 

b)  the  character  E  separating  character  and  exponent  need  be 
present  only  if  the  exponent  e   is  positive  and  its  sign  is 
omitted;  conversely,  if  the  sign  of  e   is  punched,  the 
character  E  may  be  omitted; 

c)  if  all  the  numbers  input  according  to  a  given  F-field 
description  are  so  punched  that  they  have  the  same  number  of 
decimal  places,  their  decimal  points  may  be  omitted,  as  in 
the  forms  in  the  last  column  of  Table  6-1. 

BCD  information  in  an  F-field  which  is  not  of  a  form  included 
in  Table  6-1  is  an  I/O  error  (see  section  6.3-6.3.). 
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Conversion  of  an  F-f ielcl  to  binary 

Let  W.  \  "be  +  M-,.  ^  or  |i.\  of  the  first  coliinm,  or  +  Q     or 
12  of  the  second  coliunn  of  Table  6-1  v^ith  decimal  point  preceding  the  rightmost 
k  digits;  let  e  be  +e  ,  -e    ,      or  e  .   Tlien  the  floating-point  number  W 
input  by  BCD  information  X\rith  an  exponent  is 

W  =  il.X  X  10^. 
The  floating-point  number  N  input  by  BCD  information  without  an  exponent  is 

W  =  |a.\ 
If  the  F-field  contains  only  blanks,  the  input  number  N  is  set  to  -0. 

The  absolute  value  of  the  floating-point  number  W  input  must  be 
within  the  range  of  normalized  floating  point  numbers  representable  in  the 
709^: 

,1^6936791+  X  10"^  =  2"-^^^  <  |n|  <  .17011-H183  X  10-^^. 
If  N  does  not  lie  in  this  range,  an  I/O  error  is  detected  (section  6.3.6.3. )• 

The  niimber  of  digits  in  (i.A.  or  Q     is  limited  only  by  the  length 
of  the  F-field,  but  the  27-bit  fraction  of  a  standard  709^+  floating-point 
number  permits  a  maximum  of  27  log  2  «i  8.1.  significant  digits  in  the 
floating-point  number  W. 

All  blanks  in  an  F-field  are  ignored  during  BCD  to  binary  conversion. 
An  integer  "scale  factor"  q  may  be  adjoined  to  the  basic  field  description 
of  an  F-field,  in  which  case  N  x  10   is  input  instead  of  N  whenever  a 
number  N  is  input  according  to  the  field  description  (see  section  6.3.2.1U.3. 

6.3.2.7.3,  Output  in  F-Fields 

The  contents  of  the  computer  word  to  be  output  are  assumed  to  be 
a  standard  709^  single-precision  floating-point  number  W.   Recall  that  the 
form  of  an  F-field  description  is  Fn.k. 

If  k  >  0,   N  is  converted  to  a  BCD  string  of  the  form: 
M-.A.,    if  W  >  0  or  N  =  +0, 
-|a.\,    if  N  >  0  or  N  =  -0, 
where  |a  is  a  decimal  integer  and  A.  is  a  decimal  fraction  rounded  to  k 
decimal  places  if  k  <_  9-   If  k  >  9^  A.  is  rounded  to  9  digits  and  its  last 
k-9  digits  are  zero. 
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If  >  =   Cj     li     is  eEai¥ertefl  t/o  a  BCD  stTing  of  tiie  form: 
pil"ir>Dnrl=  ^D, 
^ji  if  M  >  D  GST  JBT  =  -0, 
i&srs     p    is  a  a.eci2nal  in-teger.     lifcrte  -thst  no  fleeinal  point  is  outpixt  if 
>  =   D. 

lEbe  THTTrih^T-  of  ii^ts  ontpirt   is  ax  J-field  is  limited  only  Isfy  tile 
TTTTmhy^  of  troZLizmns,  bixt  cmly  a  -ma-riTiTTm  of  27  log  2  %  B.l  digits   ean  be 
significaj-t  _  if     ^     is  net  exacts    since  a  TO^ik  single -pre  eision  floating-point 
Enmbsr  >t^.^  a  27-t;it  fraEticn-      Since  orHj  B-1  flig3.ts  are   significant, 
tiisre  iss;y  ifs  an  srror  of  seTeral  "onits  in  tie  9^ti  decimal  place   of  \. 

If  tile  lengtn  of  tie  BCD  string  does  not  exceed  the  field  i»n.atiij 
-ne  BC3I)  strirg  is  onrput  xi^x -justified  in  the  fields   characters  in  the 
field  t©  the  left   of  the  string  -are  hlanis. 

If  the  length   of  the  HID  string  exceeds  the  field  iiiridth,    an  I/C 
error  is  detected  {see  section    6.3.6.3-}-        In  Setemiri-niiig 
the  field  mdth     n  ^   allow  for  possiole   occorrences  of     -     and      -      in 
anditicgQ  to  the  -ma-r^-mTm  ninnher  of  digits  in     M     and-     '^' 

.&n  integer  scale  factor     q     nay  be  adjoined  to  the  basic  field 
descriptian  of  ax  J-field,   in  iKhich  ease     IS  x  10     is  output  instead  of     U 
■s^enei/er  a  number     ZJT     is   output  accordii^  to  the  field  description  (see 
section  £.3.2.1^.3^. 

o.  3.  2-  !•    S-Jielos 

S-fields  are  for  ir^jut/output  of  decinal  numbers  whose  jiiachine 
repr-esentaticsn  is  a  standar-d  709^  siogle-preEision  flcating-point  nu^riber . 
The  BCD  representation  of  a  mmiber     3?     ouLpuL  in  an  E-field  is 

■where     Zi     is  a  ie^inel  fractian^   and     -;-  €     is  a  deciasl  integer  such  tlmt 
11=  .L  X  IC  -  "Lhax  is,   noEibers  oiitpnt  in  an  E-field  are  represenxed  in 

nakes  ai?aila±;le  another   oiTLput  format  for  floaxing-point  numbers    (see 
secxioi.  6. 2-2-'i}. 


jiJa  ^e  .  ^//  j.;jy  -OH- 


6.3.2.3.1.    E-Fiell  Easic  Field  Descrip-lcn 

Tae  basic   field  descriptica  of  an  E-fieZ^  is  cf  -'He  fcm 

where  the  character     Z      indicates  an  E-field^   the  •-insi^ed  dezizial  in"5ger     n 
is  the  nTimber  of  cal'izins   in  z'ae  field,   and  "he  decimal  pcinu   separates   -he 
i-msigned  integers     n     and     k.      The   interpreuatian  af  the  unsigned  decimaL  in-eg 
k     is  given  in  section  6. 3-2.  8-2,  (where   inpxt  in  an  Z-field  is   descriaedj   far 
input,   and  in  Section  6. 3'2.9. 3«for  ciitput. 

6.3'2.3.2*    Input   froni  H-f ields 

Input   in  E-fields   is   identical  tc   input   in  J-fields   (see  secticn 
6. 3.2.7. 2j   except  that   it    is  net  possible  to   seals  nuin.bers  input   in  S-f ields 
(the  last  paragraph  cf  6. 3-2.7-2,does  not  apply). 

C.3.P.S.3,   Output   in  Z -fields 

The  contents   cf  the  ccjnrputer  word  tc  he  output   are  assumed  ta  he  a 
standard  709^   single -precisian  floating-point  nunsber     IS.     Recall  that   the  icrm. 

If  >  >  0,      JT     is   com-ertei  to  a  BCD   string  cf  the  fcrzi 

-flEbe^ep  if  E  >  Q.l,        -■^.i'iEbe^s^  if       J  <   -  G.l, 

.TiE-e-ep  if  0  <  E  <.  G.l,-.iiE-e,e  if        -  G.l  <  3i  <  C^ 

-ffiEbOO  if  E  =  -h  Qj  — CEbCG  if       ZT  =   -G. 

where  li   is  a  decimal  fraction  rounded  to  k  decinal  places,    if  k  -^  5r 

if  k  >  9j      i^     -3  rounded  to  9  decimal  places  and  its   last   k  -  -^  digits  ar^ 

Tr.e  character     E      separates  fraction  and  exponent: 

b  represents   a  blank J 

€^  £,-      tr      -£^  s„      is  the  e^pcnent   such  that 

Both     s,      and     e,,      are   aXways  output;,    even  if     €-      is   terc. 
k  =  G   is  treated  as   an  I/O  error   (section  6. 3-^-3-)- 


The  decimal  fraction  Q,     is  normalized  (that  is,  0.1  <  fi  <  l)  if 
the  fraction  of  the  floating-point  number  N  is  normalized.   If  the  fraction 
of  N  is  not  normalized,  Q,     may  or  may  not  be  normalized,  since  N  is  not 
normalized  before  being  converted  to  BCD. 

The  niimber  of  digits  in  n     is  limited  only  by  the  width  of  E-field, 
but  only  a  maximum  of  27  log  2  (*;  8.1  digits  can  be  significant  if  N  is  not 
exact,  since  a  709^  single-precision  floating-point  number  has  a  27-bit  fraction. 
Since  only  8.1  digits  are  significant,  there  may  be  an  error  of  several  units 
in  the  9'th  decimal  place  of  Q,. 

If  the  length  of  the  BCD  string  does  not  exceed  the  field  width,  the 
BCD  string  is  output  right-justified  in  the  field;  characters  in  the  field  to  the 
left  of  the  string  are  blanks. 

If  the  length  of  the  BCD  string  exceeds  the  field  width,  an  l/O  error 
is  detected  (see  section  6.3.6.3.  )•   Since  the  characters 

and  Ebe-,  Sp  or  E-e   e^     always  occur  in  E-field  output,  a  field  width  of 
at  least  k  +  5  is  required  if  k  decimal  places  are  to  be  printed.   If  both 
positive  and  negative  niombers  are  to  be  printed,  a  field  width  of  at  least  k  +  6 
is  required. 


An  integer  scale  factor  q  may  be  adjoined  to  the  basic  field  description 
a  =    .a  X   lo'^  and  e  =   +   (lOe  +€„) 


of  an  E-field  used  for  output,  in  which  case  +  fi  x  10   is  output,  where 


'1  2 
(See  sections  6.  3.2. 1^+.  and  6.3.2.lU.U«) 

6.3.2.9c  K-Fields  and  0-Fields 

K  and  jZ5-fields  are  for  input/output  of  (possibly  signed)  strings 
of  octal  digits;  the  rightmost  octal  digit  of  the  string  corresponds  to  bits 
33-35  of  the  associated  709^  word,  and  successive  octal  digits  to  successive 
triples  of  bits  of  the  word,  from  right  to  left.   The  correspondence  between 
an  octal  digit  and  bits  of  the  corresponding  triple  is: 
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Octal 

Binary 

0 

000 

1 

001 

2 

010 

3 

Oil 

k 

100 

5 

101 

6 

110 

7 

111 

K-  and  ^-fields  behave 

ident 

ically  in  all  input/output  situations 

6.3.2.9.:ii  K-Field  and  ^-Field  Basic  Field  Description 

The  basic  field  description  of  a  K-field  has  the  form 

Kn 
where  the  character  K  denotes  a  K-field  and  the  decimal  integer  n  is  the 
number  of  columns  in  the  field. 

The  basic  field  description  of  an  |Z5-field  has  the  form 

0n 
where  the  character  0  denotes  an  jz5-field  and  the  decimal  integer  n  is 
the  number  of  columns  in  the  field. 

6.3.2.9.2.  Input  from  K-  and  )Z5-Fields 

The  BCD  information  of  a  K-field  or  an  jZS-field  may  have  any 
of  the  following  forms : 

+P 
-P 
P 
where  p  is  an  unsigned  octal  integer  satisfying 

0  <  p  <  777777777777  (+) 

If  p  has  d  <  12  octal  digits,  its  leading  12  -  d  octal  digits  are 
assumed  to  be  zero. 

A  string  of  blanks  may  precede  or  follow  the  BCD  information  or  be 
inserted  between  any  two  characters,  or  the  field  may  contain  only  blanks. 
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A  string  of  blanks  following  the  BCD  information  is  not  assumed  to 
represent  trailing  zeroes;  all  digits  of  the  octal  integer  to  be  input  must 
be  punched. 

The  following  conditions  are  treated  as  l/O  errors  (section  6.3.6.3^ 

a)  p  violates  condition  (+)  above; 

b)  the  non-blank  characters  in  the  K-  or  ^-field  do  not  have 
one  of  the  forms   +p,   -p,   p. 

All  blanks  in  the  field  are  ignored  during  assignment  of  values  to 
bits  1  -  35  of  the  709*+  word.   If  only  blanks  appear  in  the  field,  all  bits 
of  the  7094  word  are  set  to  0. 

The  sign  bit  of  the  709^  word  is  assigned  the  Boolean  pR   of  the 
sign  of  the  BCD  information  (+  and  "no  sign"  are  0,   -  is  l)  and  the 
left -most  bit  of  p: 


Sign  of 

the 

Left -Most 

Value  of 

the 

Sign  of 

BCD  Information 

Bit 

of 

p 

Sign  Bit 

the 

7O9U  word 

+ 

0 

0 

+ 

- 

0 

1 

- 

none 

0 

0 

+ 

+ 

1 

1 

- 

- 

1 

1 

- 

none 

1 

1 

^ 

6.3.2.9.3.  Output  in  K-  and  0-Fields 

Successive  triples  of  bits  in  the  computer  word  to  be  output  are 
converted  to  successive  octal  digits  of  the  BCD  string,  from  right  to  left, 
as  described  in  section  6. 3.2. 9- 

The  resulting  BCD  string  always  consists  of  12  octal  digits,  even 
if  one  or  more  leading  digits  are  0,  and  never  has  a  sign,.   The  sign  of 
the  word  is : 

+  if  the  12th  (left-most)  digit  of  the  BCD  string  is  <  k; 

-   if  the  12th  (left-most)  digit  of  the  BCD  string  is  >  k. 
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If  the  field  size  is  >  12^  the  BCD  string  is  output  right-Justified 
in  the  field;  characters  in  the  field  to  the  left  of  the  string  are  blanks. 

If  the  field  size  is  <  12,  characters  of  the  BCD  string  are  output 
from  right  to  left  until  the  field  is  exhausted;  the  remaining  characters 
are  not  output.   A  K-field  or  0-field  shorter  than  the  BCD  string  to  be 
output  in  it  is  not  an  l/O  error. 

6.3.2.10,  C-Fields  and  A-Fields 

The  Hollerith  card  code  for  each  character  corresponds  to  the 
internal  6-bit  BCD  code  for  the  same  character. 

6.3.2.10.1.  C-Field  and  A-Field  Basic  Field  Description 

The  basic  field  description  for  a  C-field  has  the  form 

On 
where  the  character  C  denotes  a  C-field  and  n  is  a  decimal  integer  equal 
to  the  number  of  columns  in  the  field. 

The  basic  field  description  for  an  A-field  has  the  form 

An 
where  the  character  A  denotes  an  A-field  and  n  is  a  decimal  integer 
equal  to  the  niimber  of  columns  in  the  field. 

6.3.2.10.2,  C-Field  and  A-Field  Information 

The  information  in  a  C-field  or  an  A-Field  has  the  form 

c 
where  c   is  a  string  of  Hollerith  characters  available  on  the  computer. 
Blanks  are  considered  characters  and  are  not  ignored. 

If  a  C-field  or  an  A-field  is  used  for  input :   Characters  are 
taken  from  the  field  from  left  to  right  either  until  six  columns  have  been 
read  or  until  the  field  has  been  exhausted,  whichever  occurs  first;  the 
information  is  left  justified  internally;  if  the  field  size  n  is  less  than 
six,  the  right-most  6-n  characters  are  filled  with  blanks.   If  the  field 
size  n  is  greater  than  six,  the  right-most  n-6  characters  are  lost. 
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If  a  C-field  or  an  A-field  is  used  for  output:   Characters  are 
output  from  left  to  right  either  until  six  have  been  transmitted  or  until 
the  field  has  been  exhausted,  whichever  comes  first;  the  information  is  left 
justified  in  the  field;  if  the  field  size  n  is  greater  than  six,  the 
right-most  n-6  characters  are  filled  in  vrith  blanks;  if  the  field  size  n 
is  less  than  six  i;he  right -most  6-  -  n  characters  are  lost. 

Example  s : 

(1)  If  the  format  specification 

2C3* 
were  used  to  read  a  card  punched  with 

ABCDEFGHIJIC 
in  c:_:-:_'.s  1  through  11,  the  two  computer  words  involved  would  contain 

ABCbbb 
DEFobb 

(2)  If  "he  format  specif icaxion 

C6* 
were  used  to  read  "che  card  of  example  (l),  the  single  computer  word 
involved  would  contain 

ABCDEF 

(3)  If  the  format  specification 

C7,C3* 
were  used  to  read  the  card  of  example  (l),  the  "cwo  computer  words 
involved  vro'old  contain 

ABCDEF 

HIJbbb 

6.3.2.11.  H-Fields 

The  purpose  of  the  H-Field  is  to  permit  the  inclusion  of  strings 
of  Hollerith  characters  directly  in  the  format  specification  itself. 
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6. 3-2.11. 1,  H-Field  Basic  Field  Description 

The  basic  field  description  for  an  H-field  has  the  form 

nHc 
where  the  character  H  denotes  an  H-field,   c   is  any  string  of  Hollerith 
characters  and  n  is  a  decimal  integer  equal  to  the  number  of  characters  in 
the  string,  starting  the  count  with  the  character  immediately  following  the  H. 

Since  the  number  n  explicitly  defines  the  number  of  characters  in 
the  H-field  description,  the  comma  after  the  last  character  in  the  string  c 
is  optional. 

6.3.2.11.2,  H-Field  Information 

If  an  H-field  appears  in  a  format  specification  v/hich  is  used 
for  input,  the  Hollerith  characters  which  appear  in  the  corresponding  card 
coliimns  will  replace  the  characters  in  the  string  c   in  the  format  specification 
itself. 

If  an  H-field  is  used  for  output,  the  characters  of  the  string  c 
will  be  printed  or  punched  in  the  corresponding  columns.   The  characters 
of  the  string   c   are  not  disturbed. 

6. 3- 2. 12,  Basic  Field  Descriptions  -  A  Resume 

The  purpose  of  this  section  is  merely  to  gather  together  in 
one  place  a  recapitulation  of  the  possible  eight  types  of  basic  field 
descriptions.   They  are: 

Sn  (see  section  6.3-2.k,) 

nX  (see  section  6.3-2.  5«) 

In  (see  section  6.3.2.6.) 

Fn.k  (see  section  6.3.2.'^) 

En.k  (see  section  6.  3- 2. 8-) 

Kn  or  0n  (see  section  6.3-2-9) 

Cn  or  An  (see  section  6.2-2.1Q,) 

nHc  (see  section  6.3-2.11#) 
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6.3.2.13'  Multiple  Basic  Field  Descriptions 

If  several  consecutive  fields  can  be  described  by  the  same  basic 
field  description^  repetition  can  be  avoided  by  using  a  multiple  basic  field 
description. 

(a)  A  multiple  basic  field  description  may  have  the  form 

iD 
where  D  is  any  one  of  the  basic  field  description  forms  of  section  6.3.2.12, 
Basic  Field  Descriptions  -  A  Resiime,  and  where   i  is  a  decimal  integer  equal  to 
the  number  of  consecutive  fields  with  form  D. 

(b)  If  M.   is  a  basic  field  description  of  the  form 

D 
or  is  a  multiple  basic  field  description  of  the  form 

iD 
or  is  a  scaled  field  description  S  ,  where  S  may  have  the  form  of  either  a  seals 
basic  field  description  (see  section  6. 3-2.lk.lt)   or  a  scaled  multiple  basic  field 
description  (see  section  6. 3.2.1U.2.),  then  a  multiple  basic  field  may  have  the 
form 

J(M^,  M^,  ...,    M^) 

where  j   is  a  decimal  integer  equal  to  the  niimber  of  times  the  group  of  q 
field  descriptions  M-,  )   Mm  .  .  .  ,  M  is  to  be  repeated,  and  where  the  characters 
(   and   )  delimit  the  group  of  field  descriptions  on  the  left  and  right 
respectively. 

(c)  A  multiple  basic  field  description  may  have  no  other  form  than 
those  given  by  (a)  and  (b)  above. 

Notice  in  particular  that  parenthesized  groups  may  not  be  nested. 
Exajnple  s : 

(a)  the  format  specification 

3F10.3,El8.U,2E9. 1,312* 
is  a  short  way  of  writing  the  format  specification 

FIO.  3;F10,  3,F10.  3,El8.  i+,E9.1,E9. 1, 12, 12, 12* 
They  are  logically  equivalent . 

(b)  The  format  specification 
3E10. 3,2(12, 3F10.l),2C5* 
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is  logically  equivalent  to  the  format  specification 

ElO. 3,E10. 3,E10. 3, I2,F10. 1,F10. 1,F10. 1, I2,F10. 1,F10. 1,F10. 1,C5,C5* 

6.3'2.lU,  Scaled  Field  Descriptions 

1g  is  possible  to  write  an  F-fie].d  or  an  E-field  description  v:itn 
a  scale  factor  which  will  be  applied  to  every  number  to  which  the  description 
is  applied. 

6.3.2.IU.I.  Scaled  Basic  Field  Descriptions 

A  scale  factor  may  be  applied  to  a  basic  field,  description.   Such 
a  scaled  basic  field  description  may  have  any  one  of  the  following  forms 

sFD 
+  sPD 

-  sPD 

where  D  is  either  an  F-field  basic  field  description  (see  section  6. 3.2.7- 1-) 
or  an  E-field  basic  field  description  (see  section  6.  3- 2. 8.1,).   The  character 
P  denotes  a  scale  factor^  and  s   is  a  decimal  integer  equal  to  the  exponent 
of  the  power  of  10  by  which  the  number  is  to  be  multiplied.   If  the  exponent 
is  negative  the  sign   -  must  be  punched;  if  the  exponent  is  positive  the 
sign  +  is  optional. 

6.  3.2.li+_. 2.  Scaled  Multiple  Basic  Field  Descriptions 

A  scale  factor  may  be  applied  to  a  restricted  form  of  a  multiple 
basic  field  description.   Such  a  scaled  multiple  basic  field  description  may 
have  any  one  of  the  following  forms 

sPlD 
+   sPiD 

-  sPiD 

where  D  is  either  an  F-field  basic  field  description  (see  section  6.  3.2. 7- 1.) 
or  an  E-field  basic  field  description  (see  section  6.3.2.8.1.),   i   is  a  decimal 
integer  equal  to  the  number  of  consecutive  fields  described  by  D   (so  that 

ID 
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above  has  the  form  of  the  primitive  multiple  basic  field  description  of 
section  6. 3-2. 13.  (a)),  the  character  P  denotes  a  scale  factor,  and  s   is  a 
decimal  integer  equal  to  the  exponent  of  the  power  of  10  by  which  the  number  in 
each  of  the   i  consecutive  fields  is  to  be  multiplied.   If  the  exponent  is 
negative  the  sign  -  must  be  punched;  if  the  exponent  is  positive  the  sign 
+  is  optionalo 

6.3.2.IU.3,  Scaled  F-Fields 

When  a  scale  factor  is  applied  to  an  F-f ield  the  following  formula 
holds : 

External  Number  =  Internal  Number  X  10  " 

The  scaling  (multiplication  by  10  )  is  done  before  the  number  is 

printed  or  punched  on  output  and  after  the  number  has  been  read  and  converted 
on  input.   Notice  that  scaling  actually  changes  the  value  of  the  number  in 
an  F-field. 
Example : 

Suppose  the  format  specification 

3F7.3* 
is  used  and  as  a  result  the  three  numbers  which  follow  are  printed: 

0.522b-1.567b93-671 
If,  instead,  the  format  specification 

-2P2F7.3^F7.3* 
were  used  the  same  niombers  would  print  as: 

0,005b-0.0l6b93.67l 

6.3.2.1^.1+.  Scaled  E-Fields 

When  a  scale  factor  is  applied  to  an  E-field  used  for  output,  the 
number  and  the  exponent  are  both  modified  so  that  the  value  is  unchanged; 
only  the  form  in  which  the  number  is  printed  is  changed. 
Example : 

Suppose  that  the  format  specification 

EI8.U* 
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is  used  and  as  a  result  the  number 

O.932IE-O3 
is  printed. 

If  the  format  specification 

were  used  instead,  the  same  number  would  print  as 

93.2IOOE-O5 

6.3.2.15i  Format  Specifications  and  Reading,  Punching,  and  Printing 

6.  3-2. 15. 1«  Available  Columns 

The  maximum  number  of  columns  that  may  be  described  by  a  format 
specification  depends  upon  whether  cards  or  print  lines  are  being  described 
and  whether  on-line  or  off-line  equipment  processes  the  card  or  line. 

When  input/output  according  to  a  format  specification  describing  more 
than  the  maximum  permissible  number  of  columns  is  attempted  during  execution 
of  a  program,  an  error  message  is  printed  and  the  Job  is  terminated 
(section  6.3.6.3.M- 

The  relationship  between  the  card/line  described  by  the  format 
specification  and  the  string  of  Hollerith  characters  which  is  read,  printed, 
or  punched  likewise  depends  on  the  equipment  used. 

In  the  following  tables,  both  the  maximum  number  of  columns  and  the 
relationship  between  the  format  specification  and  the  string  of  Hollerith 
characters  are  stated  in  all  detail  for  all  types  of  input/output. 
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Notes: 

(1)  If  the  lUOl  computers  that  process  input  and  output  off-line  are 
available^  the  preparation  of  an  input  tape  and  printing  and  punching  of 
an  output  tape  may  possibly  be  performed  on  the  709^  by  programs  using  the 
on-line  card  reader^  printer,  and  punch. 

The  on-line  card  reader,  printer  and  punch  cannot  process  as  many 
columns  as  can  the  lUol  computers  (see  Table  6-2).   However,  the  maximum 
number  of  columns  that  may  be  described  by  the  format  specification  is  not 
changed  if  this  on-line  processing  is  used. 

(2)  It   is   advisable  to  reserve   columns  73-80  for   identification. 

6.3.2.15.2  Carriage  Control  on  the  Off -Line  Printer 

If  a  line  image  is  to  be  printed  on  the  off-line  printer,  the  first 
character  of  the  image  is  the  carriage  control  character.   It  controls  the 
vertical  motion  of  the  printer  carriage  just  before  the  line  is  printed  -  the 
preprint  skip.   The  carriage  control  character  is  not  printed. 

The  carriage  control  characters  and  resulting  skips  are 
tabulated  and  discussed  in  section  6.2.2.^  and  in  Appendix  1. 
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6.3.3'  The  Input/Output  List 

It  was  stated  in  section  6.2'2^   Format  Specifications^  that  the 
function  of  a  format  specification  is  to  describe  the  format  of  information 
which  appears  on  an  external  medium^  cards  or  print  lines o 

It  is  the  fiinction  of  the  input/output  list  to  describe  how  the  data 
is  allocated  among  computer  storage  locations.   The  input/ output  list  is  a 
part  of  the  calling  sequence  to  any  input/ output  conversion  routine.   The 
Store-and  Trap  instruction^  STR,  is  used  to  specify  an  item  on  the  list  so  as 
to  furnish  to  the  conversion  routine  the  address  of  the  location  which  contains 
the  next  data  word. 

The  STR  instruction  may  he  used  to  specify  an  entry  in  the  l/O  list 
in  each  of  the  following  ways  with  the  indicated  results : 

(1)  STR    D 

Such  an  entry  in  the  l/O  list  indicates  that  this  item  in  the  I/O 
list  is  contained  in  the  single  computer  word  at  location  D. 

(2)  STR    D,X 

Such  an  entry  in  the  l/O  list  indicates  that  this  item  in  the  I/O 
list  is  contained  in  the  single  computer  word  at  the  location  whose  effective 
addre s s  is 

D,  X 

i.e.,  whose  address  is  D  minus  contents  of  index  register  X. 

(3)  STR    D1,0,D2 

Such  an  entry  in  the  I/O  list  serves  to  indicate  that  this  item  in 
the  I/O  list  is  a  block  of  data  contained  in 

|D2-Dl|-fl 
consecutive  storage  locations  starting  at  Dl  and  ending  with  D2. 
{h)      STR 
or  STR  0,^0 
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Such  an  entry  is  used  to  indicate  the  end  of  an  l/O  list.   To  "be 
certain  that  all  data  has  been  transmitted  an  STR  0,,0  should  be  given  before 
terminating  the  job  or  before  changing  core  loads. 

When  a  conversion  subroutine  reaches  a  point  at  which  it  needs  the 
next  item  on  the  I/O  list,  it  transfers  control  to  the  location  one  past  the 
location  containing  the  previous  item  on  the  list,  with  the  contents  of  the 
index  registers  as  they  were  after  the  entry  from  the  last  item» 

For  the  simplest  type  of  l/O  list,  that  location  would  contain  the 
next  item  on  the  list.   For  example.,  the  following  is  a  simple  l/O  list: 

STR   A 
STR   B1,,B2 
STR   MATRIX, 2 
STR 
However,  the  I/O  list  need  not  have  the  simple  form  above.   Computatior 
may  be  performed  between  items  in  the  l/O  list,  restricted  only  to  the  extent 
that  no  I/O  conversion  routine  should  be  entered  from  an  I/O  list. 

Therefore,  if  it  is  desired  to  indicate  with  an  I/O  list  that  every 
other  location  to  a  total  of  1000  locations  is  to  be  transmitted,  it  is  not 
necessary  to  write  an  l/O  list  of  1000  STR  instructions-   The  following  l/O 
list  will  accomplish  the  same  thing: 

AXT   2000,2 
L       STR   DATA+2000,2 
TIX   L,2,2 
STR 
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6. 3'^  Relationship  Between  the  Input/Output  List  and  the  Format  Specification 

Except  for  Hollerith  strings  imbedded  in  the  format  specification 
itself  (see  section  6.3-2.11.)  and  the  S-  or  X-fields,  each  field  in  the 
specification  refers  to  one  item  on  the  list.   For  this  purpose,  a  block 
item  on  the  list,  such  as    STR  A+6,,A+8   counts  as  several  items  in  the 
format  specification  (in  this  case,  A+6,A+7  and  A+8).   During  the  transmission 
of  information,  the  input  or  output  subroutine  scans  both  the  list  and  the 
specification  simultaneously,  correlating  corresponding  entries,  and 
associating  a  field  size,  a  type  of  conversion,  etc.,  with  each  variable.   If 
a  Hollerith  string  is  encountered  in  the  specification,  it  is  iinmediately 
transmitted,  and  it  is  not  associated  with  any  item  on  the  list. 
For  example,  given  the  following  I/O  list 

STR   ABC 

STR   XYZ,1 

STR   INT 

STR   K 

STR 
suppose  that  it  is  desired  to  output  using  the  following  form.at  specification 

lHl,F11.3^+2PEli^.4,S13,3HM  =  I3,S9,3KJ  =  13* 

Then  assuming  the  appropriate  values  for  the  data  the  following  line  would 
be  printed  (at  the  top  of  the  next  page  because  the  IHl  provides  a  carriage 
control  character  which  causes  a  page  eject)  : 

456.010  -I6.I25IE  02  M  =  50        J  =  IT 

As  stated  above,  an  input  format  specification  must  not  account  for 
more  than  80  columns  on  one  card.   It  may  happen,  however,  that  a  list  calls 
for  more  information  than  can  appear  on  a  single  card,  or  perhaps  only  a  certain 
part  of  each  card  is  to  be  read.   The  determining  factor  in  every  case  is 
whether  or  not  the  entire  list  has  been  accounted  for.   After  each  card  is 
read  according  to  the  format  specification,  the  list  is  consulted;  if  it  is 
not  yet  satisfied,  another  card  is  read,  and  so  on.   It  is  important  to  realize 
that  the  specification  is  not  necessarily  scanned  from  the  beginning  when  a 
new  card  is  read.   The  specification  scanner  moves  to  the  left  from  the  right 
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end  of  the  specification  (the  *)   until  it  finds  a  left  parenthesis  not  in  an 
H  field.   If  there  is  no  left  parenthesis,  it  will  move  to  the  "beginning  of 
the  specif icationo   If  it  finds  a  left  parenthesis  which  is  not  the  beginning 
of  the  format  specification,  it  then  examines  the  characters  just  to  the  left 
of  this  left  parenthesis  to  see  if  they  are  a  multiplicity  indication  (see 
section  6.3.2<.2^.   The  infonnation  from  this  left  parenthesis,  together  with 
the  multiplicity,  if  any,  to  the  end  of  the  specification  now  becomes  the  format 
specification  until  the  list  is  satisfied.   A  similar  statement  may  be  made  for 
printed  or  punched  output. 

Thus,  if  the  specification 

3F10,3  /4(F10<,3,  6HBETA  =  12)* 

is  used  with  an  I/O  list  which  contains  more  than  11  elements,  then  the  first 
line  printed  or  read  would  have  three  fixed  point  numbers.   Subseq.uent  lines 
would  all  be  printed  or  read  according  to  the  specification 

4(F10.3,  6HBETA  =  I2)-5<- 

until  the  last  element  of  the  l/O  list  were  transmitted. 

As  another  example  one  might  have  an  integer  equal  to  a  count  of 
subsequent  cards  on  a  first  data  card,  followed  by  many  cards,  each  with  six 
floating  point  numbers.   The  specification  might  then  be: 

16/  (6eio.5)*« 

Only  the  first  six  colujnns  would  be  read  on  the  first  card,  and  only  60 
columns  would  be  read  on  subsequent  cards.   The  remaining  columns  are  ignored 
and  may  contain  any  legitimate  Hollerith  characters. 

If  a  specification  contains  a  Hollerith  string  of  the  form  nHa  a  . ..a  , 
certain  conventions  are  observed. 

(1)  If  the  list  is  satisfied,  but  the  next  field  specification  is  a 
Hollerith  string,  the  string  is  transmitted. 

(2)  On  input,  i.e.,  reading  from  cards,  when  a  Hollerith  string  is 
encountered  in  the  specification,  the  information  in  the 
corresponding  columns  of  the  input  card  will  be  brought  in  and  will 
replace  the  Hollerith  string  which  appears  within  the  format 
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specification.   This  can  then  be  used  as  a  specification  for  output, 
if  desired.   For  example,  this  is  useful  for  labelling  a  set  of 
data  and  causing  the  label  to  appear  on  the  output  along  with  a 
date,  etc. 
Thus,  a  card  punched  as  follows: 

1  DATA      SET  NO.   3-A  JULY  31,  1959  J.  EOE 

might  be  read  in  with  a  format  specification 

72H  (72  blank  spaces)  t, 

Later,  this  specification  could  be  used  to  print  the  same  information  as  a 
heading  for  the  results.   Note  the  "1"  provided  for  carriage  control  for  the 
printing. 

It  is  important  to  note,  too,  that  72  blank  spaces  form  an  important 
part  of  the  specification  in  the  above  example.   The  specification  S72*  and 
72(lH  )*,  while  indicating  72  blank  spaces,  do  not  allow  the  reading  in  of  an 
entire  card,  as  was  done  above,  since  they  do  not  provide  a  storage  region  in 
the  format  specification  of  72  characters  in  length  into  which  the  information 
on  the  card  may  be  read  and  stored  until  needed. 
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6.3-5»   Input/Output  with  Conversion  Subroutines 

1.  .READ  -  read  BCD  card  images  from  the  system  input  tape  and  convert 

according  to  a  format  specification. 

2.  .PRINT-  write  BCD  line  images  on  the  system  output  tape  according  to 

a  format  specification. 

3.  .C0MNT-  write  BCD  line  images  on  the  on-line  printer  according  to  a 

format  specification. 

h.         .PUNCH-  write  BCD  card  images  on  the  system  output  tape  according  to 
format  specification. 

5.  .TAPWR-  write  BCD  line  images  on  a  specified  logical  tape  according 

to  a  format  specification. 

6.  .TAPRD-  read  BCD  line  images  from  a  specified  logical  tape  and  con- 

vert according  to  a  format  specification. 

The  above  subroutines,  described  in  sections  6.3.5-l^to  6.3.5-60. 
are  those  available  for  performing  input  with  conversion  from  BCD  to  binary 
or  output  with  conversion  from  binary  to  BCD  according  to  a  format  specifi- 
cation.  Ordinarily  the  user  needs  to  know  only  the  calling  sequence  of  the 
l/O  with  conversion  subroutine  and  how  to  write  the  format  specification 
and  l/O  list  in  order  to  program  the  desired  input/output. 

End-of-file,  end-of-tape,  and  error  conditions  may  occur  during 
execution  of  l/O  with  conversion  subroutines.   Essential  information  about 
conditions  pertinent  to  each  subroutine  is  summarized  briefly  in  the  sub- 
routine description.   In  section  6.3.6^  each  exceptional  condition  is  fully 
described  together  with  the  action  taken  at  the  corresponding  standard 
(end-of-file,  end-of-tape,  l/o  error)  return  and  how  the  user  may  specify 
his  own  (end-of-file,  end-of-tape,  l/O  error)  return,  in  case  the  user 
wishes  to  take  other  than  the  standard  action  when  an  (end-of-file,  end- 
of-tape,  l/O  error)  condition  occurs. 

6.3.5.1  .READ 

Read  BCD  card  images  from  the  system  input  tape  and  convert  according  to 
a  format  specification. 
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The  calling  sequence: 

CALL     .READ 
STR     F0RMA.T,,D 
(l/O  list) 
NORMAL  RETURN 
The  parameters  F0RMA.T  and  D 

F0RMA.T  is  the  location  containing  the  first  word  of  the  format 
specification. 

D  specifies  the  order  in  which  the  format  specification  is 
stored: 

D  =  0:   The  second  word  of  the  format  specification  is  in 

location  F0RMAT+1,  the  third  in  F0RMAT+2,  etc. 
D  /  0:   The  second  word  of  the  format  specification  is  in 
F0RMAT-1,  the  third  in  F0RMA.T-2,  etc. 
Properties  of  the  format  specification 

The  kth character  described  by  the  format  specification  is  read 
from  the  kth  column  of  the  BCD  card  image. 

A  format  specification  describing  more  than  80  columns  is  an  l/O 
error;  control  is  transferred  to  the  l/O  error  return. 
An  empty  l/O  list 

At  least  one  card  image  is  always  read,  even  if  the  l/O  list  is 
empty. 

More  than  one  card  image  is  read  only  if  the  format  specifies 
two  or  more  cards  and  specifies  the  first  card  image  to  consist  entirely  of 
S-,  X-,  and  H-  fields.   In  this  case,  card  images  are  read  until  one  of  the 
following  occurs : 

a)  the  single-line  format  specification  describing  the  last  card  image 
read  specifies  a  field  which  is  not  an  S-,  X-,  or  H-field| 

b)  the  end  of  the  format  specification  is  reached; 

c)  an  l/O  error  is  detected; 

d)  an  end-of-file  mark  is  encountered. 
The  End-of-file  Return 

The  standard  end-of-file  return  is  subroutine  SYSTEM,  which 
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terminates  execution  of  the  job.  A  non-standard  end-of-file  return  may 

be  specified  by  the  user  (section  6.3.6.1.3).   The  system  input  tape  may 

not  be  moved  forward  or  backward  once  an  end-of-file  mark  has  been 

encountered. 

The  I/O  Error  Return 

The  following  l/o  errors  may  occur  during  execution  of  .READ: 
The  card  image  to  be  read  is  that  of  a  column  binary  card 

(error  message:   BINARY  CARD  IN  BCD  DATA); 

The  format  specification  describes  more  than  80  columns 

(error  (l)  of  section  6.3.6.3.'4^; 

Format/conversion  error  (2),    (3)^  (^)  of  section  6.3.6.3.^. 

The  message  describing  the  error  is  printed  and  control  is  trans- 
ferred to  the  l/O  error  return  (section  6.3.6.3J  immediately  upon  detection 
of  the  error. 

If  a  format/conversion  error  has  occurred,  at  least  one  BCD  card 
image  has  been  read. 

The  standard  l/O  error  return  is  described  in  section  6.3.6.3.2. 
A  non-standard  l/o  error  return  may  be  specified  by  the  user  (section 

6.3.6.3.3.). 

For  a  more  complete  discussion  of  l/o  errors  and  l/O  error 
returns  see  section  6.3.6.3. 

6.3,5.2.  .PRINT 

Write  BCD  line  images  on  the  system  output  tape  according  to  a 
format  specification. 
The  calling  sequence: 

CALL     .PRINT 
STR      F0RMAT,,D 
(l/O  list) 
NORMAL  RETURN 
The  parameters  F0RMAT  and  D: 

F0RMAT  is  the  location  containing  the  first  word  of  the  format 
specification. 

D  specifies  the  order  in  which  the  format  specification  is  stored: 
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D  =  0:  The  second  word  of  the  format  specification  is  in 

location  F0RMA.T+1,  the  third  in  P0RMT+2,  etc. 
D  ^  0:  The  second  word  of  the  format  specification  is  in 
location  F0RMA.T-1,  the  third  in  PSZIrMA.T-2,  etc. 
The  format  specification;  carriage  control 

The  first  character  described  by  the  format  specification  controls 
the  carriage  of  the  off-line  printer;  it  is  not  printed.   The  legal  carriage 
control  characters  are  listed  and  their  significance  explained  in  section 
6.2.2.2.   The  (k+l)st  character  described  by  the  format  specification  is 
printed  in  the  kth  print  position  of  the  off-line  printer^  k  =  1,2, ...,132. 

A  format  specification  describing  more  than  133  characters  is  an 
l/O  error;  control  is  transferred  to  the  l/O  error  return  (see  below). 
End-of-tape  condition 

If  the  system  output  tape  is  filled  during  execution  of  a  job, 
corrective  action  is  automatically  taken  by  PORTHOS  and  the  709^  operator. 
No  intervention  by  the  user  is  necessary.   Therefore  .PRINT  has  no  end-of- 
tape  return. 
l/O  Error  Return 

Format/conversion  error  (l),  (2),  and  (5)  (see  section  6.3.6.3.^.) 
may  occur  during  execution  of  .PRINT.   (Error  (l)  is  the  format  error  referred 
to  in  the  second  preceding  paragraph. )  The  message  describing  the  error  is 
printed  and  control  is  transferred  to  the  l/O  error  return  when  the  error 
is  detected.   The  BCD  line  image  is  not  written  on  the  system  output  tape. 

The  standard  l/O  error  return  is  described  in  section  6. 3 -6. 3. 2. 
execution.   A  non-standard  l/O  error  return  may  be  specified  by  the  user 
(section  6. 3-6. 3. 3^- 

For  a  more  complete  discussion  of  l/O  errors  and  error  returns, 
see  section  6. 3. 6.3.3- 

6,3,5.3.  .  C0MNT 

Write  BCD  line  images  on  the  on-line  printer  according  to  a 
format  specification. 

The  on-line  printer  is  to  be  used  only  for  necessary  messages 
to  the  operator. 
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The  calling  sequence: 


CALL 

.C0MNT 

STR 

F0RMT,,D 

(I/O  list) 

NORMAL  RETURN 

The  parameters  F0RMA.T  and  D 

F0RMA.T  is  the  location  containing  the  first  word  of  the  format 
specification. 

D  specifies  the  order  in  which  the  format  specification  is  stored. 
D  =  0:  The  second  word  of  the  format  specification  is  in 

location  FORMAT +1,  the  third  in  F0RMAT+2,etc. 
D  ;^  0:  The  second  word  of  the  format  specification  is  in 
location  F0RMT-1,  the  third  in  F0RMAT-2,  etc. 
The  format  specification;  carriage  control 

The  kth  character  described  by  the  format  specification  is 
printed  in  the  kth  print  position  of  the  on-line  printer. 

The  motion  of  the  on-line  printer  carriage  is  not  subject  to 
programmer  control.   Successive  line  images  are  printed  on  successive 
single  spaced  lines.  After  the  last  line  is  printed,  the  subroutine  causes 
the  printer  to  skip  several  lines  so  that  the  message  is  visible  to  the 
operator. 

A  format  specification  describing  more  than  120  columns  is  an  l/O 
error;  control  is  transferred  to  the  l/O  error  return  (see  below). 
The  l/O  error  return 

Format/conversion  errors  (l),  (2),  and  (5)  (see  section  6.3.6.3-^ 
may  occur  during  execution  of  .C0MNT.   (Error  (l)  is  the  format  error 
referred  to  in  the  preceding  paragraph. )  The  message  describing  the  error 
is  printed  and  control  is  transferred  to  the  l/O  error  return  when  the 
error  is  detected.   The  BCD  line  image  is  not  written  on  the  on-line  printer. 

The  standard  l/O  error  return  is  described  in  section  6. 3.6 -3' 2. 
A  non-standard  l/O  error  return  may  be  specified  by  the  user  (section 

6. 3.6. 3. 3^ 

For  a  more  complete  discussion  of  l/O  errors  and  error  returns, 
see  section  6.3.6.3.3. 
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6,3.5.^  •  PiracH 

Write  BCD  card  images  on  the  system  output  tape  according  to  a 
format  specification. 
The  calling  sequence 

CALL     . PUNCH 
STR     FORMAT,, D 
(l/O  list) 
NORMAL  RETURN 
The  parameters  F0RMAT  and  D 

F0RMAT  is  the  location  containing  the  first  word  of  the  format 
specification. 

D  specifies  the  order  in  which  the  format  specification  is  stored: 
D  =  0:   The  second  word  of  the  format  specification  is  in 

location  FJZSrMAT+I,  the  third  in  F0RMAT+2,  etc. 
D  ^  0:  The  second  word  of  the  format  specification  is  in 
location  F0RMAT-1,  the  third  in  F5Z(RMAT-2,  etc. 
Properties  of  the  format  specification 

The  kth  character  described  by  the  format  specification  is  punched 
in  the  kth  column  of  the  card. 

A  format  specification  describing  more  than  80  columns  is  an  l/O 
error;  control  is  transferred  to  the  l/O  error  return  (see  below). 
End-of-tape  condition 

If  the  system  output  tape  is  filled  during  execution  of  a  job, 
corrective  action  is  automatically  taken  by  PORTHOS  and  the  709^  operator. 
No  intervention  by  the  user  is  necessary.   Therefore  .PUNCH  has  no  end-of- 
tape  return. 
The  l/O  error  return 

Format/conversion  errors  (l),  (2),  and  (5)  (see  section  6,3.6.3.^^ 
may  occur  during  execution  of  .PUNCH.   (Error  (l)  is  the  format  error  referred 
to  in  the  second  paragraph  preceding.)  The  message  describing  the  error  is 
printed  and  control  is  transferred  to  the  l/O  error  return  when  the  error  is 
detected.   The  BCD  card  image  is  not  written  on  the  system  output  tape. 

The  standard  l/o  error  return  is  described  in  section  6.3.6.3.2, 
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execution.  A  non-standard  l/o  error  return  inay  be  specified  by  the  user 
(section  6. '^.6, 3-3)  • 

For  a  more  complete  discussion  of  I/O  errors  and  error  returns^ 
see  section  6.3.6.3. 

6.3.5.5,  .TAPWR 

Write  BCD  line  images  on  a  specified  logical  tape  according  to  a 
format  specification. 
The  calling  sequence 

CALL      .TAPWR 
STR      LSZ(C(UWIT) 
STR      F0RMAT,^D 
(l/O  List) 

NORMAL  RETURN 

The  parameter  UNIT  '  ' 

L0C(UNIT)  is  the  location  whose  address  field  contains  UNIT^  the 
logical  tape  number  of  the  tape  to  be  written. 

UNIT  must  be  the  logical  tape  number  of: 
a  utility  tapsy 
the  system  print  output  tape  ^ 
or  the  system  punch  output  tape . 
A  table  of  logical  tape  numbers  may  be  found  in  section  6. 2,^1. 5-  Any  other 
value  for  UNIT  is  an  l/O  error;  control  is  transferred  to  the  l/O  error 
return  (see  below). 

If  UNIT  is  the  logical  tape  number  of  the  system  print  output 
tape,  the  BCD  line  image  is  written  by  .PRINT,  as  described  in  section 
6.3.5-2.   The  remainder  of  the  description  of  .TAPWR  is  not  applicable.   The 
use  of  .PRINT  is  recommended. 

If  UNIT  is  the  logical  tape  number  of  the  system  punch  output 
tape,  the  BCD  card  image  is  written  by  .PUNCH  (section  6.3-5-M^  the 
remainder  of  the  description  of  .TAPWR  is  not  applicable.   The  use 
of  .PUNCH  is  recommended. 
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The  paraEexers  7S^1'.-.Z!   and  D 

72?yAZ   is  the  location  containing  the  first  vord  of  the  format 
specification . 

D  indicates  -he  order  in  which  the  forinat  specification  is  stored: 
D  =  0:  The  second  word  of  the  format  specification 

is  in  location  F^RM/VT+1,  the  third  in  P(Z!RMA.T+2,  etc. 
D  ^  0:  The  second  word  of  the  format  specification  is 

in  location  Pj^RMAT-l,  the  third  in  F0RMA.T-2,  etc. 
?roper~ies  of  the  forT^at  specification 

The  kxh  character  described  hv  the  format  specification  is  the 
kth  character  of  the  BCD  line  image. 

A  format  specification  describing  more  than  133  columns  in  an  l/o 
error;  control  is  transferred  to  the  l/o  error  return  (see  helow) . 
The  End-of--ape  revarn 

If  UI'ilT  denotes  a  utili~y  tape,  and  an  end-of-tape  mark  is 
encountered  d'uring  ".■rriting,  after  the  BCD  line  image  has  heen  written  control 
is  -ransf erred  to  the  end-of-tape  return. 

The  standard  end-of-tape  return  is  described  in  section  6.3-6.2.1. 
A  non-standard  end-of-tape  return  may  he  specified  by  the  user  (section 
6.3.6.2.3^. 

A  riore  complete  discussion  of  the  end-of-tape  return  may  be  found 
in  section  6.3-6.2. 
The  I/'C  error  reforn 

The  following  l/C  errors  may  occur  d'oring  execution  of  .TAPvJR: 

Uim  is  not  the  logical  tape  number  of  a  utility  tape  or  one  of 
the  systen  output  tapes  (error  r:essage:   ILLEGAL  BCD  TAPE  irJI-EER); 

the  format  specification  describes  more  than  133  columns  (error 
(1)  of  section  6.3.6.3.M; 

format/conversion  errors  (2)  and  (5)  of  section  6.3.6.3-'+- 

The  message  describing  the  error  is  printed  and  control  is  transferred 
to  the  l/C  error  return  when  the  error  is  detected.   The  BCD  line  image  is 
not  '^rritten  on  tape  "JI^IT . 

The  standard  I  I  error  return  is  described  in  section  6.3-6.3-2. 
A  non-standard  I  ;  error  return  may  be  specified  by  the  user  (section  6.3-6.3-3# 
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For  a  "Ore  complete  discussion  of  i/C  errors  ar.d 
see  section  6.3.6.3. 


6.3.5.6#  .TAFBD 

Read  3CL  line  images  fro:n  a  specified  logical  -ape  ar:d  cor.ver 
according  "co  a  forr^.-  specifica-icn. 
The  calling  sequence 

CALL    .  z-.??.; 
STR      L0C(ulIIT) 
STR      I'^Bl^Al ,  ,J) 
(I/O  list) 

The  parameter  'Sl',ZZ 

L0C(UiTIT)  is  -r.e  location  vhose  address  cor:::air:s  'Sl'^ll,   the 

logical  oape  r.'_:zcer  of  -]ie  tape  zc   ce  read. 

UIIZI  zrast  ce  the  logical  tape  nuzicer  of: 

or  the  svster:  input  tape. 
A  table  of  logical  tape  nur:hers  rav  he  found  in  section  6.2.i-.5-  Anv 
other  value  for  iiZI  is  an  I  Z  error;  control  is  transferred  to  the  l/C 
error  return  (see  helov) . 


.-.t  the  standard  end-of  • 
exactly  as  if  a  3CZ'  line  itsage  h£ 


;xecuticn  01  . 


-i; 


-^  —  iry^^   rt',^j _^ 


converted  according  tc  the  forr:iat  specification  consists  entirely  of  hlar 
Consequently^  if  the  end-of-file  refjjrn  is  standard,,  anoiralous  inputs  t£.:. 
result  froi  reading  an  end-of-file  nrarh. 

A  nove  complete  discussion  of  the  end-of-file  return  nay  he  fo". 
in  section  6. 3. 6.1.   Section  c . 3.6.1. 3» descrihes  hov  the  user  lay  specify 
a  non-standard  end-of-file  return. 
The  I/C  Error  Return 

The  folloving  I;  Z  errors  nay  occur  during  execution  of  .~-.P?~: 
'Sl'iZZ   is  not  the  logical  tape  nunher  of  a  utility 

tape  or  the  systen  input  tape  (error  ~essage:   IllIC-AL  3CT  lARZ 

MJI'IBER); 


Section: 


.3.> 


the  format  specification  describes  more  than  133  columns 

(error  (l)  of  section  6.3.6.3.^^; 

format  conversion  errors  {2),    (3)^  (^)  of  section  6.3.6.3.^. 

The  message  describing  the  error  is  printed  and  control  is  trans- 
ferred to  the  l/o  error  return  (section  6,3.6.3«)  immediately  upon  detection 
of  the  error. 

If  UNIT  is  an  illegal  logical  tape  number,  no  tape  is  moved. 

If  a  format/conversion  error  has  occurred,  at  least  one  BCD  line 
image  has  been  read. 

The  standard  l/O  error  return  is  described  in  section  6,3.6.3.2. 
A  non-standard  l/O  error  return  may  be  specified  by  the  user  (section 

6.3.6.3.3.). 

For  a  more  complete  discussion  of  l/O  errors  and  l/O  error 
returns,  see  section  6.3.6.3. 
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6. 3 .6,   End-of-File,  End-of-Tape^  and  l/O  Error  Returns  of  the  l/O  with  Conversion 
Routines 

The  Normal  Return  of  each  of  l/O  with  conversion  subroutines  is 
to  the  location  following  the  STR  0,0,0  that  terminates  the  l/O  list. 

Control  is  not  transferred  to  the  Normal  Return  if  one  of  the 
following  exceptional  conditions  has  occurred  during  execution  of  the  l/O 
with  conversion  subroutine: 

an  end-of-file  mark  is  encountered  during  tape  reading^ 
an  end-of-tape  mark  is  encountered  during  writing  of  a 
utility  tape; 

an  l/O  error  is  detected  in  the  calling  sequence,  the  format 
specification,  or  the  information  to  be  transmitted. 
If  UNIT  is  the  logical  tape  number  of  the  system  input  tape,  the 
BCD  card  image  is  read  by  subroutine  .READ  as  described  in  section  6.3.5-1- 
The  remainder  of  the  description  of  .TAPRD  is  not  applicable.   Use  of 
.READ  is  recommended. 
The  parameters  F0RMAT  and  D 

F0RMAT  is  the  location  containing  the  first  word  of  the  format 
specification. 

D  indicates  the  order  in  which  the  format  specification  is 
stored: 

D  =  0:   The  second  word  of  the  format  specification  is  in 

location  F0RMAT+1,  the  third  in  F0RMAT+2,  etc. 
D  /  0:  The  second  word  of  the  format  specification  is  in 
location  F0RMAT-1,  the  third  in  F0RMAT-2,  etc. 
Properties  of  the  format  specification 

The  kth  character  described  by  the  format  specification  is  the 
kth  character  of  the  BCD  line  image  read. 

A  format  specification  describing  more  than  133  columns  is  an  l/O 
error;  control  is  transferred  to  the  l/O  error  return. 
An  empty  l/O  List 

If  the  l/O  list  is  empty,  at  least  one  BCD  line  image  is  always 
read. 
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More  than  one  line  image  is  read  only  if  the  format  specifies 
two  or  more  lines  and  specifies  that  the  first  line  image  consists 
entirely  of  S-^  X-,  and  H-fields.   In  this  case,  line  images  are  read 
until  one  of  the  following  occurs: 

the  single-line  format  specification  describing  the  last 

line  image  read  specifies  a  field  not  an  S-,  X-,  or  H-field; 
the  end  of  the  format  specification  is  reached; 
an  l/O  error  is  detected; 
an  end-of-file  mark  is  encountered. 
The  End-of-file  Return 

If  UNIT  denotes  a  utility  tape,  and  an  end-of-file  mark  is  en- 
countered during  reading,  control  is  transferred  to  the  end-of-file 
return  (section  6.3.6.1*) .   Each  l/O  with  conversion  subroutine  is  programmed 
to  transfer  control  to  the  "Standard  End-of-file  (End-of-tape,  l/O  Error) 
Return"  of  the  subroutine  whenever  the  corresponding  exceptional  condition 
occurs.   The  "Standard  End-of-file,  (End-of-tape,  l/O  Error)  Procedure"  is 
then  executed.   The  standard  return  and  procedure  may  depend  upon  parameters 
of  the  calling  sequence.   (in  some  cases,  at  the  standard  return,  execution 
of  the  l/O  with  conversion  routine  continues  exactly  as  if  no  exceptional 
condition  had  occurred. ) 

If  the  standard  procedure  does  not  treat  some  occurrence  of  an 
exceptional  condition  satisfactorily,  it  is  possible  for  the  user's 
program  to  intervene.   By  entering  subroutine  SETE0F  (SETETT,  SETERR)  the 
user  may  set  a  non-standard  End-of-file  (End-of-tape,  l/O  Error)  Return; 
that  is,  cause  control  to  be  transferred  to  a  location  of  his  choice  after 
every  subsequent  End-of-file  (End-of-tape,  l/O  Error)  condition  that  occurs 
during  execution  of  an  l/o  with  conversion  subroutine.   The  user  may  then 
take  some  appropriate  action,  subject  to  limitations  imposed  by  the  operating 
system,  the  state  of  the  machine  when  control  is  transferred,  and  the  infor- 
mation furnished  him  by  the  l/O  with  conversion  subroutine.   It  is  also 
possible  to  supplant  a  non-standard  End-of-file  (End-of-tape,  l/O  Error) 
Return  by  the  corresponding  standard  return. 

It  is  important  to  understand  that  the  setting  of  a  non-standard 
return  for  a  given  type  of  exceptional  condition  and  the  restoration  of 
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the  corresponding  standard  return  have  no  effect  whatsoever  upon  the 
treatment  of  the  other  exceptional  conditions.   If  only  part  of  the 
occurrences  of  a  given  exceptional  condition  while  the  corresponding 
return  is  a  non-standard  return  require  special  treatment,  the  user 
must  be  able  to  distinguish  them  from  the  other  occurrences. 

The  End-of-file  condition  is  discussed  in  section  6. 3.6.1^- the 
End-of-tape  condition  in  section  6.3.6.2.,  and  the  l/O  Error  condition  in 
section  6. 3- 6. 3-  At  least  the  following  information  is  given  for  each  of 
the  conditions: 

the  state  of  the  machine  when  the  condition  occurs; 

the  standard  return(s)  and  procedure(s); 

how  to  set  a  non-standard  return; 

the  information  available  when  control  is  transferred  to  a  non- 
standard return; 

how  to  restore  the  standard  return. 

6.3.6.1.    The  End-of-File  Return 

6.3.6.1.1.  Position  of  the  Tape  at  the  End-of-File  Return. 

The  system  input  tape  is  immediately  before  the  end-of-file  mark. 
It  cannot  be  repositioned  by  the  user. 

A  utility  tape  is  positioned  immediately  after  the  end-of-file 
mark. 

6.3.6.1.2.  The  Standard  End-of-file  Return 

If  the  l/O  with  conversion  routine  is  reading  the  system  input 
tape,  at  the  standard  end-of-file  return  the  message 

****   ALL  INPUT  DATA  HAVE  BEEN  PROCESSED. 
AT  L0C  XXXXX 
(where  XXXXX  is  the  location  from  which  the  l/O  routine  was  called)  is 
printed  and  the  job  is  terminated,  by  subroutine  SYSTEM. 

If  an  l/O  with  conversion  subroutine  is  reading  a  utility  tape, 
then  at  the  standard  end-of-file  return,  execution  of  the  l/O  with 


Date:  k/l^/6k 

Section:  6.3.6, 

Page :  3 
Change : 


conversion  subroutine  continues  exactly  as  if  a  BCD  line  image  had  been 
read.   The  line  image  which  is  converted  according  to  the  format  specifi- 
cation consists  entirely  of  "blanks.   Consequently,  if  the  end-of-file 
return  is  standard,  anomalous  inputs  may  result  from  reb-ding  an  end-of- 
file  mark. 

6.3.6.1.3.  Setting  the  End-of-File  Return 

The  subroutine  SETE0F  is  used  to  set  a  non-standard  end-of- 
file  return  WHERE.   Its  calling  sequence  is: 

CALL     SETE0F 
TXH      WHERE 
TXH      WHICH 
After  a  non-standard  end-of-file  return  has  been  set,  whenever 
an  end-of-file  is  read  by  an  l/O  with  conversion  routine, 

(1)  the  logical  tape  number  of  the  tape  being  read  is 
stored  in  the  address  field  of  WHICH  and 

(2)  control  is  transferred  to  WHERE. 

The  standard  end-of-file  return  is  restored  by  entering  SETE0F 
with  the  following  calling  sequence: 

CALL     SETEjzSF 

TXH      L 
where  the  contents  of  L  is  zero. 

6.3.6.2,    End-of  Tape  Returns 

An  end-of-tape  condition  can  be  detected  only  while  a  tape  is 
being  written,  and  cannot  be  detected  while  a  tape  is  being  read.  An 
end-of-tape  condition  on  the  system  output  tape  is  handled  automatically 
by  an  Execution  Coordination  Routine;  the  user 's  program  is  not  informed  of  the 
condition  and  the  user  need  not  concern  himself  with  it, 

6.3.6.2.1.  The  Standard  End-of -Tape  Return 

If  an  end-of-tape  condition  occurs  during  writing  of  a  utility 
tape,  five  end-of-file  marks  are  written  after  the  last  record  written, 
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the  tape  is  rewound  and  unloaded,  and  the  operator  is  informed  of  the 
condition  by  a  message  on  the  on-line  printer.   Unless  the  user  has 
requested  the  mounting  of  another  reel  of  tape  and  continuation  of  the 
job,  the  job  is  then  terminated  by  the  operator. 

6.3.6.2.2.  Position  of  the  Tape  at  the  Non-Standard  End-of-Tape  Return 

When  control  is  transferred  to  a  non-standard  end-of-tape 
return,  the  tape  is  positioned  at  the  end  of  the  last  record  written, 
i.e.,  after  the  end-of-tape  mark.   No  further  warning  that  the  physical 
end  of  the  tape  is  being  approached  will  be  given  if  more  records  are 
written  on  the  tape . 

6.3.6.2.3,  Setting  the  End-of-Tape  Return 

The  subroutine  SETETT  is  used  to  set  a  non-standard  end-of- 
tape  return  WHERE.   Its  calling  sequence  is: 

CALL     SETETT 
TXH      WHERE 
TXH      WHICH 
After  a  non-standard  end-of-tape  return  has  been  set,  whenever 
an  end-of-tape  mark  is  encountered  on  a  utility  tape  being  written  by  an 
l/O  with  conversion  routine, 

(1)  the  logical  tape  number  of  the  tape  being  written  is 
stored  in  the  address  field  of  WHICH  and 

(2)  control  is  transferred  to  WHERE. 

The  standard  end-of-tape  return  is  restored  by  entering  SETETT 
with  the  following  calling  sequence: 

CALL     SETETT 

TXH      L 
where  the  contents  of  L  is  non-zero, 

6.3,6,3,   l/O  Errors 


6.3.6.3.1,  Definition  of  I/O  Error 
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JJD  1±ds  •wT±ta-iip   l/C  errors  are  errors  in  the   r«,1 1  "i n,g  sequence. 
fcxzE"  spsci?its~ioz:,  or  infomsliion  t;o  ce  "crarsritTed  det,ected.  by  the  I/O 
Til  til  ccm'yersioB  subiro'iitines  or  bj  .ife,  the  subrou-ine  tbax  interprets  forma-: 
specifica-ions  and  perforrs  the   conii^rsion .   In  theor^",  ax  leasx,  l/O  errors 
are  al«s,js  attribiitable  to  tne  -^ser.   l/C  errors,  as  here  defined,  do  nox 
occur  daring  tie  esecation  of  xhe  Execution  Coordination  subroutines. 

Detection  of  an  I/O  error  results  in  xransfer  of  control  to  the 
l/O  error  return  (section  6.3-6-3-2iJ. 

Erro3-s  iexected  by  xhe  l/O  vith  conTersion  subroutines  are  lisxei 
in  the  descriptions  of  tie  respective  subroutines.   For  the  sake  of  brevity. 
errors  iexecxed  by  .1^,  hereafter  called  forsax/conversion  errors,  are 
listed  in  section  6.3.6.3.^  the   format/conversion  errors  vhich  Tsary   occur 
during  execution  of  each  subroutine  are  also  listed  in  ixs  "write  up. 

IrurerouE  oxher  error  conditions  related  to  input/output,  for 
£25i:ple.  a  bad  rsgnexic  xape^  nay  occur  during  execution  of  l/O  with 
Con"?ersion  Subrouxines .   Sore  of  xhese  errors  ray  cause  a  nessage  to 
appear  on  the  printed  output.  Bux  ix  is  only  alter  tie  l/O  erroi^  defined 
above  xis.t  control  is  transferred  to  the  l/O  error  rexurn  and  it  becoEies 
possible  for  tie  user^s  program  xo  intervene.   Ihe  other  error  conditions 
are  ^orrecxei  by  xhe  rperaxor  or  xhe  i!E.intenance  personnel. 

6.3.6.3.^  lie  Standard  l/C  Error  Frocedure 

(1)  .-.  ressage  describing  xhe  error  is  printed  ty   the  l/O  sub- 
routine thax  dexecxs  xhe  error.   Ix  is  followed  'zy   the  line  1/^  S^DTHiE 

Ihe  integer -"lvalue d  l/O  error  code  generated  'zy   the  subroutine 
'detecting  xhe  error  is  not  xa.de  a'.TBilable  xo  the  user  ax  xhe  standard  I/Z 
error  rexum. 

(2)  Ihe  .job  is  xerminated  by  subroutine  SYSIS!'^,  vithout  any 
cere  dunp  being  given,  unless  a  -5  l/^  ±KMP   control  card  and  a  control  card 
specif:.-ing  a  x:.— e  of  &':arp   (S  X'Jl'CP.   SLI3IiU]'E=.  -$  JULl  Dul'f?)  are  in  the  first 
gr'Dup'  of  S  Conxrol  cards  in  the  job  deck.   If  such  control  cards  appear, 
xhe  specified  type   of  cere  du— x  is  given  vhen  ti^  job  is  xenrinated  by  51351- 


6.3.-.3-3»   2T;--s-a-i3jri  _^  I   idrror  aeitarES 


The  SiiiiroiiitLne  SSESHS  Is  used,  tc   se~  a  z.cz-s'z&iLCSjr'l  _""  'Ei 


g.^Tti  Tm-eiL- 


ever  ar 


Alfter  a  noE-staEdaxTi  l/O   error  ret'iz-r:  !:££   c^e^r:  s= 
'/?   errcr   Is  detec^ed.^ 

,,^1       T^iie  "esss^e  described  In  infce  ff  7-=-  par£.grap]i  of 

sec":.icn  c.3---3-^is  printei. 
(2)     tBe  errO'i"  code   'Da'rres5?o~Liiizig  tcr  itie  Z/C   enrDr  is 
scored,  ii:  ~r.e  address  "zcrzLziz.  cf?  VSZCE. 

I"   Is  usuallv  zcT  rcssicle.    after  a  f'or:iH.b/cor:TerslC'ii  erroi 

;inu.e  processlr^  "h.e  -ext   field;    see  sec^lcn  c.3-^-3--- 


_  ^C       it'  I. 


-  cr     ■*»(=:«:- 


C^JLL 


.J.c.j--- 


a.ei:.ect-sa.  r: 


input;/ otrtput-  confers  ion . 

ZJhe  fornat/con  vers  ion  errors  -are  lis-ed  ':elO'v:   -he  f: 

each  descripLiion  is   (neari;")  the  error  ~es5a.ge  as£02ia~ed  vi~h 

(1)  F^B2^!tiS  SrHCUZ^-  I'^BE  TMMx  ZU.  CfijJME . 
Cccurs  during  co-h  input  and  ou-pui:-.      IXS  is   ~he  rax: 

Oi   coluanns  perEi-ted  cy   uhe   input/ output  nediun  and  : 
Eent  heing  used.      iJhese  -:?:■>"■''?;■  are  "srula-ed  in  seon' 

(2)  B&Ij  j^>y.r. 


.  li': 


1    ~ 


5ec-ion:        0.3. c« 
ji'sge; 


to  an  illegal  basic  field  tj-pe,  a  left  (right)  parenthesis 
without  a  corresponding  right  (left)  parenthesis,  too  many 
levels  of  parenthesization,  or  a  field  width  of  zero. 
(3)  BAD  CARD. 

Occurs  diiring  input  only.  A  field  in  the  card  or.  line  image 
"being  processed  contains  some  character  not  permitted  in  this 
type  of  field  -  see  the  pertinent  basic  field  description  for 
legal  forms  of  input  in  the  field. 
(k)     NUMBER  LIES  ^UTSIDE  MACHINE  RANGE. 

Occurs  during  input  only.   The  number  in  the  field  being 
processed  is  not  in  the  set  of  numbers  with  the  internal 
representation  assumed  for  numbers  of  this  field-type  which 
fit  in  a  709^  machine  word.   Bounds  are  given  in  the  descrip- 
tion of  each  basic  field  t\'pe. 

(5)   NUMBER  T00  LARGE  F0R  SPECIFIED  FIELD  WIDTH. 
Occurs  during  output  only.   The  string  of  BCD  characters 
resulting  from  I-,  F-,  or  E-  conversion  is  longer  than  the 
allocated  field.   Excess  length  of  the  string  resulting  from 
K-,  0-,  A-,  or  C-  conversion  is  not  an  l/O  error;  the  string 
is  truncated  to  fill  the  allocated  field  by  a  rule  given  in  the 
discussion  of  the  basic  field  description. 

It  is  possible  for  the  calling  program  to  set  a  switch  in  the 
conversion  routine  .I0H  so  that  the  "number  too  large  for  specified  field 
width"  condition  is  not  treated  as  an  l/O  error  (see  section  6. 3.6 •3-5')  • 
The  recognition  and  treatment  of  all  other  tj^es  of  i/C  errors  is  not 
affected. 

Observe  that  a  field  of  width  0  is  considered  a  BAD  Fi^EMkT 
(type  (2))  error,  not  a  t;>'pe  (5)  error. 

6. 3. 6. 3. 5*  Causing  the  Conversion  Routine  to  Ignore  the  "Number  too  large  for 
specified  field  width"  Error. 

The  "Number  too  large  for  specified  field  width"  error,  error  (5) 
of  section  6.3.6.3.^,  is  iiore  f"ally  described  there.  After  the  switch 

1^'ESZZ   in  the  conversion  routine  .I0H  is  set  by  the  instructions 
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CALL     I0HSIZ 

TXH      M 
where  the  contents  of  M  is  non-zero^ 

a  "number  too  large  for  specified  field  width"  condition  is  no  longer 
an  l/O  error.   If  W  is  the  field  width,  the  W  rightmost  characters  of  the 
BCD  string  are  printed  or  punched  in  the  specified  field  (excess  characters 
to  the  left  are  lost)  and  output  continues.   (W  is  >  0,  since  a  field  of 
0  width  is  a  tj'pe  (2)  error.) 

The  switch  I0HBIZ  may  be  reset  to  normal  status  by  executing 

CALL      I0HBIZ 

TXH       L 
where  the  contents  of  L  is  zero.   Thereafter  all  occurrences  of  the 
"number  too  large  for  specified  field  width"  condition  are  treated  as 
l/O  errors . 

, 3.6.3-6«  Limitations  on  a  Non -Standard  l/O  Error  Procedure  Following  a  Format/ 
Conversion  Error 

At  the  time  control  is  transferred  to  a  non-standard  l/O  Error 
Return,  the  current  input  BCD  string  being  converted  (BCD  string  to  be 
output)  is  still  in  the  working  storage  of  conversion  routine  .I0H.   Howev( 
if  the  l/O  with  Conversion  Subroutine  is  re-entered,  another  input  card/ 
line  image  is  read  (the  BCD  output  string  is  initialized  to  blanks). 
Therefore  it  is  in  general  not  feasible  to  skip  over  the  current  basic  fie; 
specification  and  begin  processing  the  next.   It  is  evident  that  complex 
programming  would  be  necessary  to  minimize  the  amount  of  input/output 
omitted,  especially  if  the  current  format  specification  describes  multiple 
card/line  images , 
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